.Schneider 


NEU; 

DAS  SOFTWARE-EXPERIMENT 


Schneiderw 


BASISPLATINE 

CENTRONICS-KAR 


DIE  NEUESTE  SOFTWARE 
JOYSTICKS  IM  TEST 


Joyce: 

TAB  ELLEN  KALKULATION 


Tips  +  Tricks 

SOFTKEYS 

SP- 1000  HARDCOP 


Colour  Monitor  »CTM  640 


Juli  1986 
2.  Jahrgang 


COMPARE 


RH-DAT 

O  Bedienerfreundliches  Dateiverwaltungsprogramm  mit 
FREIER  Maskendefinition  (max.  21  Felder/ 
max.  70  Zeichen  pro  Feld) 

O  Verwaltet  Ihre  Daten  auf  der  Diskette  in  RELATIVEM 
Zugriff 

O  Arbeitet  mit  einem  oder  zwei  Laufwerken.  (Zweites 
Laufwerk  kann  auch  eine  RAM-Floppy  sein.) 

O  Suche  nach  jedem  beliebigen  Datenfeld 

O  Ein  Datensatz  wird  bei  der  Suche  im  Indexfeld  selbst 
bei  voller  Datei  (503/1003  Datensätzen)  in 
max.  4  Sekunden  (Regelfall  1-2  Sekunden)  gefunden 

O  Läuft  unter  dem  Betriebssystem  CP/M*) 

O  Testberichte  in  Schneider  CPC  International 
Heft  11  und  12/85- 

O  Sie  werden  staunen,  was  RH-DAT  noch  alles  kann. 

•  2  Versionen  a)  503  Datensätze  DM  79 — 

b)  1003  Datensätze  DM  89,- 

•  Für  Computer  CPC  464, 664, 6128  und  JOYCE 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4" 


RH-DMON 

O  Absolut  anwendersicherer  Diskettenmonitor 
O  Lesen  und  Schreiben  beliebiger  Sektoren 
O  Editieren  beliebiger  Sektoren  (Full  Screen  Editor) 

O  Formatieren  einzelner  oder  aller  Spuren 
(CP/M,  DAT,  IBM) 

O  Reorganisation  der  Diskette  (räumt  die  Diskette  auf) 
O  Anzeige  des  Katalogs 
O  Drucken  des  Bildschirminhaltes 
O  Umrechnung  der  Blockangaben  in  Spur  und  Sektor 
O  Bearbeitet  AUCH  die  Spuren  40  und  41!!! 

O  Testbericht  in  Schneider  CPC  International  Heft  2/86 

•  1  Version  (verbessert)  DM  59,— 

•  Für  Computer  CPC  464, 664, 6128 

•  Diskettenformat  Schneider  3" 


RH-MATHEXT 

O  Mathematische  Textverarbeitung  (Neuheit) 

O  Anwendersicher,  leistungsfähig,  aber  dennoch  einfach 
in  der  Handhabung 

O  Zeigt  Text  und  mathematische  Formeln  so  auf  dem 
Bildschirm  an,  wie  der  Ausdruck  später  erfolgt 
O  Mit  mathematischen  Sonderzeichen 
O  Ohne  Druckersteuerzeichen 
O  Läuft  nur  in  Verbindung  mit  EPSON -kompatiblen 
Druckern  mit  DOWNLOAD-Funktion 

•  1  Version  DM  69,— 

•  Für  Computer  CPC  464, 664, 6128 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4” 


TURBO-ADRESS 

O  Komfortable  Adressenverwaltung  mit  RELATIVEM 
Zugriff  (ca.  700  Adressen) 

O  Ausgereifte  bedienerfreundliche  Textverarbeitung 
(ähnlich  WORDSTAR*)) 

O  Anwenderfreundliches  Verknüpfungsprogramm  (Rund¬ 
schreiben,  Etikettendruck,  Listendruck,  usw.) 

O  Installationsprogramm  für  Drucker  (auch  exotische 
Drucker  können  angepaßt  werden) 

O  Läuft  unter  dem  Betriebssystem  CP/M*) 

O  Für  professionelle  Anwendungen  zugeschnitten 

O  Ein  Muß  für  jeden,  der  häufig  Adressen  und  Texte 
verknüpft 

•  2  Versionen  a)  700  Adressen  DM  149,— 

b)  1400  Adressen  DM  169,— 

•  Für  Computer  CPC  464, 664, 61 2B  und  JOYCE 

Version  b)  gilt  nur  für  JOYCE  in  Ver¬ 
bindung  mit  Megabyte-Laufwerk. 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4” 


MICA 

Das  CAD-Programm  für  Ihren  Computer: 

O  Maßstabsgerechtes  Erstellen  von  Zeichnungen 
und  Layouts  in  Zoll  und  mm 

O  6  Zeichenebenen  (Layer-Technik) 

O  Symbolbibliotheken  in  beliebiger  Menge 
anlegbar 

O  Symbolbibliotheken  für  Heizungsinstallation, 
Architektur,  Elektronik-Schaltpläne  und 
Platinen-Layouts  sind  bereits  vorhanden 

O  Symbole  können  vergrößert,  verkleinert,  gedreht 
und  gespiegelt  werden 

O  Rastergitter  einblendbar 

O  Ausdruck  sowohl  auf  Drucker  als  auch  auf 
Plotter  möglich 

•  1  Version  DM  198,— 

•  Für  Computer  CPC  464,  664,  6128  und  JOYCE 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4" 


Einsteigerpaket 

O  Adressenverwaltung 
O  Textverarbeitung 
O  Synthesizer  (Musikprogramm) 

O  Vokabel-Lemprogramm 
O  Funktionsplotter  (Mathematikprogramm) 

•  2  Versionen  a)  Kassette  DM  50,— 

b)  Diskette  DM  70,— 

•  Für  Computer  CPC  464, 664, 6128 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4” 


RH-BUERO 

O  Integriertes  PrQgrammpaket 
O  Komfortable  Adressenverwaltung 
O  Anspruchsvolle  Textverarbertung 
O  Leistungsfähiges  Verknüpfungsprogramm  (Rund¬ 
schreiben,  Etiketten-  und  Listendruck) 

O  Schaufensterwerbung  (erstellte  Texte  können  als 
Laufband  ausgegeben  werden) 

O  Installationspragramm  für  Drucker 
O  Für  semi-professionelle  Anwendungen  geeignet 
O  Testbericht  in  Schneider  CPC  International  Heft  8/85 

•  1  Version  DM  69,— 

•  Für  Computer  CPC  464, 664, 6128 

•  Diskettenformat  Schneider  3",  Vortex  5 1/4" 


Vereinsverwaltung 

O  Komplexes  Paket  zur  Vereinsverwaltung 
O  Anwendersichere  Mitglieder-  und  Beitragsverwaltung 
mit  Paßwortschutz 

O  Kontenführung  mit  einfachster  Verbuchung  und 
Jahresbilanzerstellung 
O  Ein  Muß  für  jeden  Verein 

•  1  Version  DM  99,— 

•  Für  Computer  CPC  464, 664, 6128 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4" 


RH-GAMMON 

O  Spielstarkes  Backgammon-Programm 
O  5  Spielstarken  /Demo-Mod 

•  2  Versionen  a)  Kassette  DM  39,— 

b)  Diskette  DM  49,— 

•  Für  Computer  CPC  464, 664,  6128 

•  Diskettenformat  Schneider  3”,  Vortex  5 1/4” 


Infokatalog  gegen  DM  1,-  Rückporto. 
Händleranfragen  erwünscht. 

Auslandsbestellungen:  nur  gegen  Vorkasse 
Programme  und  Softwareautoren  für 
Schneider  CPC  464,  664, 6128  und  JOYCE  gesucht. 
*)  Eingetragene  Warenzeichen: 

CP/M  /  Digital  Research,  WORDSTAR  /  Micro  Pro 

Vertrieb  Niederlande: 

ACS  Nederiand 
Molenpoortstraat  40 
Tel.  08346-3850 
NL-7041  BG's-Heerenberg 


R.C.5.  nmuLmo 


Bestellungen,  die  bis  12  Uhr  bei  uns  eintreffen,  verlassen  am  selben  Tag  das  Haus. 

COMPUTER  DIVISION  0211-5065213 

Was  Sie  heute  bestellen,  kann  schon  morgen  bei  Ihnen  sein. 


INTEGRAL  HYDRAULIK 

Am  Hochofen  108  •  D-4000  Düsseldorf  11 

Tel.  0211-5065-213 


Alle  Preise  inkl.  14%  MwSt. 
zuzüglich  DM  5,-  Versandkosten. 
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Liebe  Leser, 

mit  Erscheinen  dieser  Ausgabe  werden  Ihnen  sogleich  mehrere  neue  Rubriken  auffallen, 
die  Sie  jetzt  regelmäßig  erwarten  dürfen. 

Bei  der  Auswahl  der  Themen  hoffen  wir  eine  glückliche  Hand  gehabt  zu  haben,  um  so 
eine  möglichst  breite  Verwendung  zu  gewährleisten. 

Zunächst  möchten  wir  Ihnen  unsere  neue  Top-Serie  "Das  Software-Experiment”  vor- 
stellen,  sie  wird  sich  vor  allem  mit  den  Grundzügen  der  künstlichen  Intelligenz  be¬ 
schäftigen.  Dazu  hat  unser  Autor  Matthias  Uphoff  mehrere  "echte  Delikatessen"  vor¬ 
bereitet,  die  Sie  im  Verlauf  dieser  Serie  garantiert  begeistern  und  zur  aktiven  Mitarbeit 
anregen  werden. 

Des  weiteren  beginnen  wir  mit  einem  Floppy-Kurs,  der  Ihnen  die  Mechanik,  Hand¬ 
habung  und  Programmierung  von  Diskettenlaufwerken  erläutern  wird.  Im  Verlauf 
dieses  Kurses  werden  mehrere  nützliche  Tools  und  Programme  entwickelt,  die  Ihnen 
den  Umgang  mit  der  3”-  bzw.  5  l/4"-Disk-Station  erleichtern  sollen. 

Die  Rubrik  "CAL”  steht  für  computergestütztes  Lernen  ( Computer  Aided  Leaming). 
Wie  der  Name  schon  verrät,  werden  hier  vor  allem  Lemprogramme  Berücksichtigung 
finden,  die  sich  auf  sämtliche  Themenkreise  des  Schulalltags  beziehen. 
Selbstverständlich  haben  wir  dabei  auch  an  die  Kleinsten  unter  uns  gedacht,  die  ja 
bisher  mit  guten  Lernprogrammen  nicht  gerade  verwöhnt  wurden. 

Zur  Zeit  herrscht  auf  dem  Softwaremarkt  ein  wahrer  Spiele-Boom,  täglich  landen  neue 
Programme  auf  unseren  Tischen. 

Bei  dieser  Aktualität  und  Qualität  für  uns  Grund  genug,  dem  Genre  Computerspiel 
einmal  einen  breiteren  Raum  zu  widmen.  Unser  Spiele-Experte,  Heinrich  Stiller,  hat 
dazu  das  Neueste  vom  Neuen  in  Wort  und  Bild  zusammengetragen  und  mit  mehreren, 
auch  kritischen,  Beiträgen  angereichert. 

Diese  Thematik  findet  ihre  Ergänzung  im  Programm-Hit  des  Monats.  Peter' 's  Family 
ist  ein  hervorragend  gelungenes  Reaktions-  und  Geschicklichkeitsspiel,  das  durchaus 
mit  professionellen  Programmen  konkurrieren  und  mehrere  Stunden  am  Bildschirm 
fesseln  kann. 

Aus  aktuellem  Anlaß  möchten  wir  auf  unseren  neuen  Platinenservice  hinweisen,  der 
alle  Schneiderware-Produkte  umfaßt  und  zu  hart  kalkulierten  Preisen  angeboten 
wird. 

Die  Resonanz  auf  unsere  Hardware-Ecke  war  übrigens  überwältigend;  auch  hier  werden 
die  kommenden  Ausgaben  viele  interessante  Produkte  zum  Selbstbau  hervorbringen. 
Alles  in  allem  werden  diese  neuen  Rubriken  ergänzend  zum  bisherigen  Inhalt  wirken 
und  somit  ein  noch  vielfältigeres  Spektrum  bieten. 

Ideen,  Anregungen  und  selbstverständlich  auch  Kritiken  werden  wir  uns  auch  weiterhin 
zu  Herzen  nehmen  -  es  ist  und  bleibt  Ihre  Schneider  CPC  International 

Herz  liehst  Ihr 


(Stefan  Ritter) 
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Inhalt- 


Berichte: 


Joy  with  your  Stick 

-  des  Spielers  wichtigstes  Werkzeug  unter  der  Lupe  16 

GAME  OVER  Joystick  kaputt  -  was  nun?  19 

Swords  &  Sorcery 

-  Rollenspiel-Abenteuer  sind  im  Kommen  20 

Cheap  Thrills 

-  was  bringen  die  sogenannten  "Billig-Spiele”?  22 

Programmieren  -  aber  richtig 

-  das  benutzerfreundliche  Gestalten  eines 

Programmes  116 

Hurra,  wir  leben  noch! 

-  Welche  Rolle  spielt  dabei  der  Computer?  92 

Knack  die  Nuß 

-  magische  Quadrate  und  deren  Auflösung  122 


Serie: 


Das  Software-Experiment 

-  Grundzüge  der  künstlichen  Intelligenz.  70 


Hardware: 


Schneiderware  #  2 

-  komplette  8-Bit-Centronics-Karte  zum  Selbstbau!  60 

CPC  am  TV 

-  Ton  und  Bild  zum  TV  über  die  Video-Buchse  99 

Stereo  Volldampf  voraus  109 


Tips  &  Tricks: 


Softkeys  am  CPC 

-  frei  programmierbares  Tastenfeld  für  alle  CPCs!  80 

Inkey-Routine 

-  Input  ohne  Probleme!  81 

Headerlose  Kassettenoperationen 

-  schnelles  Saven  durch  headerloses  Abspeichern  81 

Wohin  mit  Bits  und  Bytes 

-  wo  speichert  man  MC-Programme  am  besten?  83 

Erweiterte  Mathefunktionen 

-  24  neue  Funktionen  87 

CPC-Listingservice 

-  Checksummer  V.2  als  Eingabehilfe  für  Listings  114 


CP/M: 


Wir  basteln  ein  Limbo 

-  neue  CP/M-Bcfehle  mit  Submit-Dateien 

auch  für  Joyce- Anwender  40 

CP/M  und  seine  Möglichkeiten 

-  der  Nevada  Fortran-Compiler  78 


Programme: 

Compare 

-  dieses  tolle  Hilfsprogramm  vergleicht  zwei  Programme 

und  protokolliert  die  jeweiligen  Abweichungen  94 

Peter’s  Family 

-  schnelles  Reaktionsspiel  in  Maschinensprache  100 

Nurse 

-  komfortabler  Disk-Manager  130 


Auf  vielfachen  Wunsch  unserer  Leser  beginnen  wir  ab  dieser  Ausgabe  mit  einem 
Floppy-Kurs.  Ziel  ist  es,  die  Handhabung  und  Programmierung  von  Disketten¬ 
laufwerken  zu  vermitteln  und  zudem  die  komplizierte  Technik  anschaulich  dar¬ 
zustellen.  Im  Verlauf  dieses  Lehrgangs  werden  nützliche  Tips  &  Programme  erar¬ 
beitet,  die  u.a.  auch  die  Vortex-Laufwerke  berücksichtigen. 


Solche  hervorragenden  Grafiken  werden  Sie  künftig  öftererleben,  wenn  Sie  regel¬ 
mäßig  bei  unserem  ''Software-Experiment"  dabei  sind.  Diese  neue  Serie  orien¬ 
tiertsich  an  Grundzügen  der  künstlichen  Intelligenz  und  stellt  Grundlagen  sowie 
Ergebnisse  in  anschaulicher  Form  dar.  Unser  Bild  zeigt  eine  der  berühmten 
” Apfelmännchen'  '-Grafiken. 


CPC-Extra:  In  unserem  großen  Spiele-Teil  finden  Sie  nicht  nur  die  neueste 
Software,  auch  die  Joysticks,  als  wichtigstes  Zubehör,  werden  vorgestellt  und  gete¬ 
stet.  Abgerundet  wird  dieser  Spiele-Komplex  durch  viele  Berichte  rund  um  das 
Genre  Computerspiel,  hier  erfahren  Sie  auch  näheres  über  Fantasy-  und 
Rollenspiele. 
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Lehrgänge: 


Basic  für  Einsteiger 

-  das  dritte  Modul  der  Adressverwaltung  13 

NEU:  Floppy-Kurs 

-  Einführung  in  den  Umgang  mit  Diskettenlaufwerken  88 

Pascal 

-  die  grundlegenden  Datentypen  und  deren 

Verwendung  96 

Z-80  Assembler 

-  Rotations-  und  Schiebebefehle  des  Z-80  1 18 


Joyce: 

Kalkül.!) 

-  Super-Tabellenkalkulation  mit  vielen  Features.  28 
Kommunikationsfreudige  Sackgasse 

-  die  parallel/serielle  Schnittstelle  im  Test  37 

Fernsicht 

-  erhöhte  Rechengenauigkeit  bei  Mallard-Basic  1 1 1 


Referenzkarte: 

Die  Hardware-Register  115 


Software  Reviews: 


Anwendungen: 

C-Basic-Compiler 

42 

Workwriter  jr. 

-  eine  Alternative? 

43 

Mathe-Pack 

43 

Textman 

44 

Spiele: 

Fairlight 

44 

Bombjack 

45 

Bat  man 

46 

Commando 

47 

Movie 

48 

5th  Axis 

49 

Monty  on  the  Run 

50 

Eden  Blues 

50 

Hard  Hat  Mack 

51 

Strangei  oop 

52 

CAL: 

Der  CPC-Vokabeltrainer 

53 

Rubriken: 
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Impressum 

3 

Leserbriefe 

6 

Schneider  Aktuell 

12 

Bücher 

124 

Händlerverzeichnis 

126 

Com  puter-Clu  bs 

127 

Kleinanzeigen 

128 

Tnserentenverzeichnis 

133 

Vorschau 

134 

In  unserer  neuen  Rubrik  "Computer  Aided  Leaming"  werden  wir  in  Zukunft  regel¬ 
mäßig  Programme  a  us  diesem  A  n  wendungsbereich  veröffentlichen.  ZumA  uftakt 
finden  Sie  in  diesem  Heft  einen  Vokabeltrainer. 


Der  Programm-Hit  des  Monats  Juli  heißt  "Peter" s  Family".  Das  vollkommen  in 
Maschinensprache  gehaltene  Spiel  zeichnet  sich  durch  hervorragende  Grafik, 
Super-Sound  und  vielfältige  Optionen  aus.  Sie  benötigen  große  Geschicklichkeit 
und  eine  gute  Reaktion,  um  alle  fünf  Level  zu  durchqueren. 


Die  seit  kurzem  erhältliche  Centronics-RS-232-Schnittstelle  für  den  Joyce  wurde 
einem  ausführlichen  Praxistest  unterzogen.  Die  Testergebnisse  sowie  einige  An¬ 
wendungsbeispiele  zeigt  unser  Bericht  auf  S.  3  7!  Des  weiteren  werden  sich  Joyce- 
Benutzer  über  das  Tabellenkalkulationsprogramm  “Kalkül. 0"  freuen,  eine 
Super-Anwendung  für  Heim-  und  Business-Betrieb. 


7  ’86  CPC  5 


. . 


M  1 1 1 1  1 1 1 1 1 1 1 1 1 1 1 


Milli 


iimii  min 


Briefe- 


Eine  Bitte  an 
unsere  Leser 

Die  Rubrik  »Leserbriefe«  ist 
eine  Einrichtung  für  alle  Le¬ 
ser,  die  in  irgendeiner  Form 
Fragen,  Probleme  oder  An¬ 
regungen  zu  Produkten,  Pro¬ 
grammierproblemen  oder  zu 
unserer  Zeitschrift  haben. 
Selbstverständlich  sind  wir 
bemüht,  alle  Leserfragen  zu 
beantworten.  Doch  haben 
Sie  bitte  Verständnis,  daß  wir 
nicht  alle  eingehenden  Briefe 
persönlich  beantworten  kön¬ 
nen.  Oft  erreichen  uns 
mehrere  Briefe  zum  gleichen 
Thema,  einer  davon  wird 
dann  stellvertretend  für  alle 
in  unserer  Zeitschrift  beant- 


CONTEXT 

Mit  einem  herzlichen  Dank 
für  die  Veröffentlichung  des 
wahrhaft  komfortablen  Text¬ 
programms  CONTEXT, 
sende  ich  Ihnen  die  Än¬ 
derungen,  die  nötig  sind,  um 
eineA  npassung  a  n  EPSON- 
Drucker  zu  erreichen.  Ich 
arbeite  selbst  mit  einem  FX- 
100+ ,  aber  die  Pokes  und 
Änderungen  dürften  auch 
für  die  80er  Drucker  gelten. 
Um  zwischen  deutschem 
und  internationalem  Zei¬ 
chensatz  auswählen  zu  kön¬ 
nen,  muß  folgendes  geändert 
werden: 

Eingabe  im  Direktmodus 
POKE  &9F  15,82 
POKE  &9F16,2 
Bitte  nehmen  Sie  folgende 
Korrekturen  vor: 

Zeile  80  -  cset=z&9F16 
Zeile  1360-  anstatt  54  die  2, 
anstatt  55  die  0 
Zeile  1890  -  anstatt  55  die  0 
Zeile  1920  -anstatt  55  die  0 
Da  sich  NLQ-Druck  auf 
dem  EPSON  nicht  realisie¬ 
ren  läßt,  habe  ich  für  Brief¬ 
qualität  den  Druckmodus 
ELITE,  für  Entwurfsdruck 
PICA  gewählt: 

Eingabe  im  Direktmodus: 
POKE  &9F1B.77 
POKE  &9F1C.0 
POKE  &9F30,80 
POKE  &9F3 1,0 

Bitte  ändern  Sie  folgende 
Zeilen: 

Zeile  80  -  nlq—&9FlB 
Zeile  1340  -  POKE  nlq,  77 


w'ortet.  Da  auch  wir  nicht  alle 
Fragen  auf  Anhieb  beant¬ 
worten  können,  müssen  wir 
recherchieren.  Und  das  dau¬ 
ert  bekanntlich  seine  Zeit!! 
Wir  möchten  hiermit  alle 
CPC-Leser  noch  einmal  auf 
unseren  Leser-Service  hin- 
weisen  und  bitten  bei  der 
Vielzahl  der  eingehenden 
Briefe  um  etwas  Geduld.  Für 
eilige  Anfragen  steht  unsere 
Redaktion  jeden  Mittwoch 
von  17-20  Uhr  am  »Heißen 
Draht«  zur  Verfügung.  Vie¬ 
len  Dank  für  Ihr  Verständnis. 

Ihre  CPC-Redaktion 

PS:  Die  Redaktion  behält  sich 
vor,  Leserzuschriften  in  ge¬ 
kürzter  Form  wiederzugeben. 

Zeile  1350  -  POKE  nlq, 80 
Zeile  1830  korrigieren: 
PEN  l+INT(PEEK(nlq)/ 
40):LOCATE... 

Zeile  1840- 

PEN  1  +(3-INT(PEEK(nlq) 
/40)):LOCATE... 

Gehen  Sie  folgendermaßen 
vor: 


Starten  Sie  das  Programm 
mit  RUN  und  wählen  Sie 
dann  die  Funktion  Basic,  so 
daß  das  Programm  beendet 
wird.  Geben  Sie  dann  die 
POKEs  im  Direktmodus  ein 
und  sichern  dann  mit  SA¬ 
VE  "CONTEXT.  BIN”,  b, 
&9300,&D00.  Anschließend 
ändern  Sie  mit  EDIT  die 
entsprechenden  Zeilen  im 
Basic-Programm  und  sichern 
wieder  mit  SAVE” CON¬ 
TEXT”.  Wenn  Sie  nun  den 
Rechner  zurücksetzen  und 
erneut  mitR  UN”CONIEXT” 
starten,  dann  stehen  die  Funk¬ 
tionen  zur  Verfügung. 

Peter  Weber 
Dülmen 

Context- 

Anpassungen 

Für  Star-Drucker  SG  1 0  im 
IBM-Mode. 

Druckersequenz  für  NLQ  ein 
= 27,52,0 

Druckersequenz  für  NLQ 


aus=27,53,0 

(s.  Tabelle  Context-Anpas- 
sungen). 

Dieses  Programm  hat  mich 
beinahe  ausnahmslos  begei¬ 
stert.  Ich  halte  es  wegen  der 
leicht  erlernbaren  Handha¬ 
bung  für  den  Hobby-Bereich 
für  entschieden  zweckmäßi¬ 
ger  als  z.B.  " Wordstar ”  oder 
das  Textprogramm  in  "Open 
Access”,  mit  denen  ich  bereits 
beruflich  arbeitete. 

Die  Ursache  für  den  im  fol¬ 
genden  beschriebenen  kleinen 
Fehler  konnte  ich  allerdings 
nicht  finden: 

Bei  eingeschalteter  "NLQ” 
wird  vom  Programm  die  "ein¬ 
fache  vergrößerte  Schrift" 
(~V)  nicht  erkannt.  Nur  wenn 
zusätzlich  Zeichenhervorhe¬ 
bung  eingeschaltet  ist,  wird 
auch  unter  ” NLQ”  breit  ge¬ 
druckt. 

Für  einen  Tip  zur  Lösung  des 
Problems  wäre  ich  sehr  dank¬ 
bar. 

Gerhard  Schmidt, 
Stuttgart 


Tabelle  Contextanpassungen 

Änderungen  "CQNTEXT. BIN"s 
&9F1A  DB  27,53,0 

&9F2F  DB  27,53,0 

&9C14  DB  &3A ,  &1B , &9F  — >>  LD  A , CB9F1B) 

&9C17  DB  &EE.&35  ““>>  XOR  53 

1.  Änderungen  "CONTEXT. BAS” : 

80  . . . :n!q-&9FlB 

1340  POKE  nlq , &34 : GOSUB . . . . 

1350  POKE  nlq,  8,35 :  BOSUB.  ..  . 

1B30  IF  PEEKCnlq3*&34  THEN  PEN  2  ELSE  PEN  1 
1935  LOCATE  1B , 4 : PR I NT "BrieFqual i tat ” 

1B40  IF  PEEKCnlq)-ß34  THEN  PEN  1  EL5E  PEN  2 
1845  LOCATE  16 , B : PR  INT "Entwurf sdruck" 

Für  464  mit  Doppel* loppy  und  SG1Q 

2.  Änderungen  "CONTEXT. BAS" : 

BO  . :  laufui-BSFF7 

2B0  PEN  1:  LOCATE  1B,  4  :  PRINT"Ausdruck”  :  GOSUB  1B30 
265  PEN  1: LOCATE  16 , B : PR I NT "Lauf werk GOSUB  1B40 
590  IF  y-14  THEN  CLS : PEN  1 : ÖD I SC : ÖA : END 

1340  IF  PEEKC nlq}“S34  THEN  POKE  nlq,&35  ELSE  POKE  nlq,&34 
1345  GOSUB  1B30 ; GOTO  1290 

1350  IF  PEEKC lauf  uD-0  THEN  POKE  laufw, 1: ÖDISC: ÖB: GOTO  1356 
1352  IF  PEEKC  laufui)“l  THEN  POKE  lauFw, 2: öCAS: GOTO  1356 
1354  POKE  lauf  tu,  0:  ÖDISC:  ÖA 
135B  GOSUB  1B40 : GDTO  1290 

1930  PEN  2 : LOCATE  25,4: IF  PEEKCnlq)=&34  THEN  PRINT”  NLQ”  ELSE  PR 
lNT”Entui” 

1B35  RETURN 

1840  PEN  2 : LOCATE  25,6: IF  PEEKC lauf uD-0  THEN  PRINT”OscA” : GOTO  1B 
45 

1842  IF  PEEKC lauf THEN  PRINT”DscB”  ELSE  PRINT”Cass” 

1B45  RETURN 

Für  Besitzer  des  Schneider-Druckers  müssen  die  folgenden  Zeilen  na¬ 
türlich  anders  lauten: 

1340  IF  PEEKCnlqD-1  THEN  POKE  nlq,0  ELSE  POKE  nlq,l 

1B30  _ : IF  PEEKCnlq}-!  THEN  PRINT”  NLQ"  ELSE  PRINT”Entui” 
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Schneider  CPC 
Software-Schnell-Versand 


STAR-WRITER I  w  /  664  /  6128) 

Das  zur  Zeil  leistungsfähigste  Textsystem  tür  den  CPC,  das 
völlig  neue  MaBstäbe  in  Bedienung  und  Leistung  setzt  I 


Textverarbeitung 

Grafikprogramm 

DIN-Tastatur 

Serienbriefe 

Blockoperationen 

Trennvorschläge 

Suchen  und  Ersetzen 


Adressverwaltung 
DFÜ-Programm 
PULL-DOWN  Menues 
Fließtexteingabe 
Block-  und  Flattersatz 
Bausteinverarbeitung 
Kopf-  und  Fußzeilen 


•  mit  ausführlichem  Handbuch  nur  198,- 

Fordem  Sie  unseren  Sonderprospekt  zum  STAR-WRITER  I  anl 

Wir  haben  Superprogramme  auch  für  die  JOYCE: 

DATEI-STAR  universelle  Dateiverwaltung . .  98,- 

STAR-MAIL  Fremddrucker  u.  Serienbriefe .  98,- 

FIBU-STAR*  prof.  Finanzbuchhaltung .  298,- 

STAR-BASE  prof. Datenbanksystem .  198,- 

Fordern  Sie  auch  hier  unser  JOYCE-Prospekt  an! 


Rushware  Mouse  für  CRC. C64,  Atari  148.- 
256k  Silicon  Disc  für  CPC's  379.- 

Vortex  Fl  -S 


S.J5-  EirtachtaulwM.  '08  KByle,  Contra«*!  CP/M 
Vortex  Fl  -D  S.3S'  DooO»«»u'*er».  1,4  Meyl«.  Conlroll»,.  CP/M 

Vortex  M1-S  ~eFt-s.Wdac»inxr 

Vortex  M1-D  ■ü  1 1  -O.  |«aoch  3.5' 

Vortex  WD-1  0  *0  M0yi*  Fe«ipiaite  m*t  umfang<oicn#n  ui^ue* 

Vortex  WD-20  20  MByla  F«s1oatl«  mit  omUnufmchsn  OMiltes 

Vortex  F1-X  l.«'  Z««wl»ulw»!X.  708  KByle,  ROM-Soltw«,« 

Vortex  M1-X  *.«Fi-x.|e!!och.«3,a- 

Speichererweiterungen  für  CPC  464/664 

SP  64  .  275,-  Erweiterungssätze 

SP  1  28  .  348- 

SP  256  .  478-  KIT  64  .  73,- 

SP  320  .  528,-  KIT  256  . 213- 

SP512  .  589,-  KIT  51  2  . 314- 

dk’tronlcs  64K  Erweiterung 

ertaubt  «sä  Benutzung  von  CP/M  30  aut  ccm  464/664. 

CPC  6128  -  Emulator  und  Handbuch 


1 1  98,- 
1698,- 
998- 
1498,- 
2689,- 
3289- 
759,- 
759,- 


1  Baaic-Erwetterung, 


179- 


Kasselte 

Airwolf .  29,00 

Alien  Highway .  35,90 

Batman .  29,90 

Blade  Runner .  29,90 

Bomb  Jack . 27,90 

Bounder .  29,90 

Bruce  Lee .  29,90 

Combat  Lynx .  29,00 

Crafton  and  Xunk .  36,90 

Cycus  II  3-D  Schach .  33,90 

Devils  Crown .  29,00 

Eden  Blues/Doomsday  Blues...  33,90 

Elite  deutsch .  58,00 

E*Basic .  49,00 

Fa  ir  light .  35,90 

Fighter  Pilot .  29,00 

Fighting  Warrior .  29,00 

Frank  Brunos  Boxing .  29,00 

Frankie  goes  to  Hollywood...  29,90 

Ghost  and  Goblins .  34,90 

Gyroscope .  29,00 

Hacker .  33,90 

Hexenkueche .  29  00 

Hyper  Sports . 29,'oo 

Lord  of  middle  Ages .  39,00 

Lord  of  the  Rings .  59,00 

Mindshadow .  37,00 

Moon  Cresta .  29,90 

Monty  on  the  Run .  32,90 

Monopoly .  34,90 

Movie .  29,90 

N.O.M.A.D .  29,00 

Ping  Pong .  29,00 

Rambo  II....................  29,90 

Red  Hawk .  29  ,*90 

Rock ’n ’Wreatle .  29,90 

Saboteur .  34,90 

Samantha  Fox  Strip  Poker....  29,90 

Shadowfire.  . . .  33,90 

Space  Invasion  (Commando) . . .  28,90 

Spin  Dizzy .  36,90 

Strangei oop .................  29,90 

Strike  Force  Harrier .  35,90 

Swords  and  Sorcery .  35,90 

Tau  Ceti .  33,90 

The  Way  of  the  expl.  flat...  29,90 

The  Way  of  the  Tiger .  36,90 

Thing  on  a  Spring .  29,90 

Tomahawk .  34,90 

Turbo  Esprit . 29^90 

Winter  Games................  36,90 

Winter  Sports .  36,90 

Yie  ar  Kung  Fu .  29,00 

Zoida .  29,90 


Professionelle  CP/M  Software 

Wordstar .  189,00  xxxx 

dBase  II .  189,00  xxxx 

Multiplan .  189,00  xxxx 

Small  C  Entwicklungssystem  139,00  xxxx 

Turbo  Pascal .  219,00  xxxx 

Turbo  Pascal  mit  Grafik...  279,00  xxxo 

Turbo  Tutor  deutsch .  99,00  xxxx 

Turbo  Toolbox .  2  19,00  xxxx 

Turbo  Graphik  Toolbox .  219,00  xxxo 

Turbo  Lader  Grundpaket....  129,00  xxxx 

Turbo  Lader  Business .  139,00  xxxx 

Turbo  Lader  Science .  189,00  xxxx 

C Basic  Compiler .  169,00  xxxx 

Pascal  MT+ .  169,00  xxxx 

DR  Draw .  189,00  ooxx 

DR  Graph .  189,00  ooxx 

Faktan  1  +  2 .  189,00  ooxx 

Kompatibilität????? 

Die  Angaben  In  den  Klammern  zeigen 
die  Hardwarevorausetzungen  an: 

(xxxx)  +  484/664/61 28/ Joyce 
l.  B.  (ooxx)  +  nur  6128  und  Joyce 


dk’tronics  256k  Erweiterung  oben. jedoch  256k 


Video -Digitizer  1000 
incl.  Software  für  alle 
CPC’s  395- 


379.- 


Diskette3" 

Airwolf .  47,90 

Alien  Highway .  47,90 

Bomb  Jack .  4  7,90 

Bruce  Lee .  47,90 

Combat  Lynx .  47,90 

Crafton  and  Xunk .  47,90 

Cyrus  II  3-D  Schach .  47,90 

Devils  Crown .  47,90 

Eden  Blues/Doomsday  Blues...  47,90 

Elite  deutsch .  69,90 

ExBasic .  59,00 

Fighter  Pilot .  47,90 

Fighting  Wa rr ior/expl .  fi3t.  69,00 

Frank  Brunos  Boxing .  47,90 

Ghost  and  Goblins .  47,90 

Hacker .  47,90 

Hyper  Sports .  47,90 

Lord  of  middle  Ages .  49,00 

Mindshadow . . .  47,90 

Monty  on  the  Run .  47,90 

Movie .  47,90 

Ping  Pong .  47,90 

Space  Invasion .  47,90 

Spin  Dizzy .  47,90 

Spitfire  40 .  47,90 

Sorcery  plus .  47,90 

Strangeloop .  47,90 

Strike  Force  Harrier .  47,90 

Tau  Ceti .  47,90 

The  Way  of  the  Tiger .  47,90 

Tomahawk .  47,90 

Winter  Games .  47,90 

Winter  Sports .  47,90 

Who  dares  wins  II .  47,90 

Yie  ar  Kung  Fu .  47,90 

3  D  Grand  Prix . . .  47,90 


•••  HARDWARE  ***  HARDWARE  »•* 

Sprachaythesize  r .  139,00 

Lightpen .  99,00 

Rushware  -  Maus .  148,00 

AMX  -  Maus .  289,00 

Joystick  PRO  5000 .  59,00 

Joystick  Speed  King .  44,50 

Joystick  Turbo  3 .  44,50 

Joystick  Moonraker  1 .  24,95 

Joystick  Y-Adapter .  19,50 

Matrixdrucker  Melchers  CPA  80  GS 
komplett  mit  Kabel .  589,00 


Heimcomputer-Shop 


1  Waldeck-Automaten  Vertriebsgesellschaft  mbH 


Bahnhofstraße  10  Telefon 
2870  Delmenhorst  (04221)16464 


*  ß*  ////■*' 
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Augen  auf  beim  Computerkauf 

Schneider  PCW  8256  Joyce  1648,— 

Schneider  PC W  85 12  Joyce  Plus  2298,— 

Schneidet  CPC  464  Keyboard  448,— 

Schneider  CPC  664  Keybcard  (mit  Floppy)  798,— 

Schneider  CPC  61 28  Keyboard  (mit  Floppy)  1 298, — 

Schneider  Grünmonitor  GT-65  (für  alle  CPC)  348 — 
Schneider  Farbmonitor  CTM-644  (für  alle  CPC)  798,— 
Schneider  CPC  464  mit  Grünmonitor  598, — 

Schneider  CPC  464  mit  Farbmonitor  998,— 

Schneid«  CPC  664  mit  Grünmonitor  998  — 

Schneider  CPC  664  mit  Farbmonitor  1498,— 

Schneider  CPC  61 28  mil  Grünmonitor  1498, — 

Schneider  CPC  6128  mit  Farbmonitor  1948. — 

Schneider  3-ZolFFtoppy-Disk.  DDI-1  648— 

mit  CP/M  und  Logo 

dito  als  2  Lautweik  (ohne  CP/M  u  Logo)  559,— 
Vortex  5  25"-Ftoppy-Disk  F 1  -S  (Einreist.)  1 1 98— 
Vortex  5  25"-Floppy-Disk.  F  1-0  (Doppelst)  1698,— 
Vortex  Autrüstkit  A  1-S,  F  1-S  aul  E  1-0  498,— 

NEU  Vottex  M  1-X  3  5  Zoll  Zweillaufwerk  758,— 
NEU  Vortex  F1-X  5  25  Zoll  Zweitiaulwerk  758. — 

NEU  Vortex  M 1-XRS  3  5  Zoll  Zweiilaulwerk  658. — 

NEU  Vortex  F  1  -XRS  5  25  Zoll  Zweitlaufwerk  858— 
Cumana  3  Zoll  Zweiilaulwerk  428,— 

Cumana  5.25  Zoll  Zweiilaulwerk  598, — 

Datenrecorder  Sony  für  CPC  664/61 28  98,— 

3  Zoll  Disketten  Panasonic  5  Stück  59, — 

ab  10  Stück  je  11,50  ab  100  Stück  je  10,50 

5  25  Zoll  Disketten  96  tpi  für  Vortex-Laufwerke 
10  Stück  in  PVC  Hartbox  69,95 

Netzteil  MP  1  für  Schneider  CPC  464  1 39,— 

Netzteil  MP  2  für  Schneider  CPC  664/6128  159,— 

RAM-Erweiterungen  der  FA  Vortex 
RAM-Erweiterung  SP-64  insgesamt  128  KByte  275, — 
RAM-Erweilerung  SP- 1 28  348.— 

RAM-Erweiterung  SP-256  478— 

RAM-Erweiterung  SP-320  528,— 

RAM-Erweiterung  SP-51 2  589, — 

RAM-Erweiterung  für  Joyce  auf  512  KB  148, — 

FD-2  (2  Laufwerk  für  Joyce  1  MB)  698— 

BüdscfiirmtHter  für  Joyce  89,— 

Monitor-Drehfuß  Neigungswink,  stufenlos  einslellb.  39,95 
Verlangerungskabel  1  5  m  für  CPC  464  29,95 

dilo  für  CPC  664  und  61 28  34,95 

Quickshot  II  mil  Aulofire  1 9,95 

Competition  Pro  5000  mit  Mikroschaller  59,95 

Oiskettenbox  lür  40  St  3  Zoll-Disketten  39  95 

Diskettenbox  für  40  Si  3  5  Zoll-Disketten  39  95 

Diskettenbox  lür  40  Sl  5  25  Zoll-Disketten  49  95 
Oiskettenbox  1. 1 00  SL  5  25"-Disketten  m  Schlo8  34  95 
Staubschutzhauben  aus  weichem  Kunstleder  (Schneider- 
grau)  für  CPC  464/664/6128,  NLQ  401,  ODI-1,  Monilor 
Gnin/Farbe  je  1 7,95 

komplett  f  CPCu  Monitor  (bitte  Geräte  angeben)  29,95 
Akustikkoppler  S21d  279,— 


Supersoftware  für  Ihren  CPC 


Wordstar  3.0 

199,- 

Textomat 

99.- 

dBase  11 

199,- 

Dalamat 

99,- 

Multiplan 

199,- 

Profi  Painier 

99,- 

Turbo  Pascal  30  219,- 

Profimal 

99- 

Turbo  Pascal  3.0 

Mathemat 

99,- 

mil  Gralikunterst 

279,- 

Budgetmanager 

99,- 

Turbo  Tutor 

99,- 

Tuitx-Lad.  Business  148,- 

Turbo  Toolbox 

219,- 

Turb,  Graph  Toolbax  21 9,- 

C-Basic-Compiler  169,- 

Pascal/MT+ 

169,- 

Small-C 

148,- 

Turh-Lad  Science  189.- 

DR DRAW 

199- 

DR  GRAPH 

199- 

FIBU-Slar  Plus 

298,- 

Oatei-Star 

98,- 

Slar-Mail 

98.- 

Star-Writer  1 

198,- 

zum  Teil  sind  die  Programme  auch  lur  den  Joyce  geeignet, 
daher  bitte  Computertyp  und  Drsklormat  angeben 

DHUCKERPARADE  ORUCKERPARADE 

Matrixdrucker  DMP  2000  678— 

Epson  LX-80  100  ZetchVSek  I  KByle  Puffer  898  — 
Epson  FX-85  160  Zeich/Sek.  8  KByte  Putter  1378, — 
Epson  FX-105  160  2eichJStk.  8  KByle  Pullet  1798  — 
Epson  HI-80  4-FarbplcMter  A4  1298,— 

Panasonic  KX-P  1080  100  Zeich/Sek  798, — 

Panasonic  KX-P 1091  1 20  Zeich/Sek  898,— 

Panasonic  KX-P  1092  180  Zeich/Sek  1198. — 
Panasonic  KX-  P  1 592  Breitformat  1 648,— 

Panasonic  KX-P  3151  Typenradd nicket  1548— 
SlarNLIO  898  — 

Rlteman  f  +  1 05  Zeich/Sek.  2  KByte  Putter  998,— 
DruckeranschluBkabel  CPC  464/664  49,- 

dito  jedoch  6128  59  — 

Super-Druckersländer  98  — 

Ersatzfarbbänder  ab  Lager  lieferbar 
Endlospapier  weiß  m.  Mikroperforation  500  Blatt  19,95 
dilo  jedoch  1000  Blatt  34,95 

dito  jeodch  2000  Blatt  49,95 

Alle  Geräte  mit  FTZ  und  deutschem  Handbuch. 
Technische  Unterlagen  je  Gerät  gegen  1,50  OM  in  Brief¬ 
marken  Express  vetsand  speziell  in  die  Schwerz  und  nach 
Österreich  einfachste  Abwicklung  der  Bezahlung 
Kein  Ladengeschäft  mehr,  nv  Versand. 

Abholung  bitte  telefonisch  avisieren!! 


Wangener  Str.  99 
D-7980  Ravensburg 
Tel.:  0751/26138 


CONTEXT,  noch 
eine  kleine  Er¬ 
weiterung  gefällig? 

Nach  der  Programmerweite¬ 
rung  in  Ihrer  Ausgabe  Nr.  5, 
fiel  mir  erst  auf,  daß  ein 
Löschen  von  Texten  von  der 
Diskette  umständlich  war, 
zumal  man  erst  auf  den  inter¬ 
nationalen  Zeichensatz  und 
dann  noch  zum  Basic  um¬ 
schalten  mußte. 

Was  mich  beim  Lesen  der 
Directory  jetzt  stört,  ist  das 
Auflisten  sämtlicher  Titel 
der  Diskette,  die  auch  noch 
ganz  bequem,  z.B.  von  Unbe¬ 
fugten,  gelöscht  werden  kön¬ 
nen. 

Da  ich  Besitzer  nur  eines 
Laufwerkes  bin,  habe  ich 
logischerweise  nicht  nur 
Briefe,  sondern  auch  die 
BAS-,  HEX-  und  BIN-Files 
von  CONTEXT  auf  der  Disk. 
Es  wäre  eine  tolle  Überra¬ 
schung,  wenn  plötzlich  die 
Programme  weg  wären,  weil 
sie  sich  so  leicht  löschen  las¬ 
sen.  Oder? 

Mit  einer  kleinen  Änderung 
in  der  Zeile  541  werden  mit 
CTRL  C  nur  die  abgespei¬ 
cherten  Texttitel  angezeigt. 
Die  komplette  Zeile  sieht 
jetzt folgendermaßen  aus  (s. 
Listing  1): 


Außerdem  muß  in  den  Zeilen 
552  und  553  der  Wert  für 
”x=21”  in  ”x=16”  geän¬ 
dert  werden,  damit  der  rote 
Pfeil  für  die  rechte  Seite  der 
Directory  eine  neue  Position 
erhält. 

Dieter  Kallenbach 
Offenbach 

Setup 

Zu  dem  Beitrag  CP/M  SET¬ 
UP  (CPC  5/86,  Seite  81)  von 
OlafKolle,  erlauben  Sie  mir 
bitte  eine  Anmerkung. 

Es  ist  mit  der  SETUP.  COM- 
Version  2.0  nicht  möglich,  in 
den  Initial  Command  Buffer 
und  den  Sign-on-String  ein 
Carriage  Return  oder  ein 
Line  Feed  zu  bringen! 


Die  Ursache  hierfür  liegt 
darin,  daß  SETUP  zum 
Einlesen  einer  Zeile  die 
CP/M-Funktion  OAH  ver¬ 
wendet.  Diese  Funktion  wer¬ 
tet  einige  Steuerzeichen  aus. 
SETUP  fügt  das  fehlende 
Carriage  Return  auch  nicht 
automatisch  ein. 

Um  dieses  mißliche  Pro¬ 
blem  zu  umgehen,  gebe  ich  für 
die  kritischen  Steuerzeichen 
Dummy-Codes  ein,  die  ich 
anschließend  mit  einem 
Disc-Editor  direkt  in  Track 
0  gegen  die  gewünschten 
Codes  austausche. 

Es  wäre  wünscheswert,  daß 
sich  die  Firma  Schneider 
dieses  Problems  annimmt, 
da  die  Funktion  von  SET¬ 
UP  doch  sehr  unter  diesem 
Fehler  leidet. 

Dieter  Lausberg 
Ludwig shafen/R  h 

Context 

Nachdem  ich  mit  dem  Text¬ 
vera  rbe  i  tu  ngsprogra  m  m 
CONTEXT  ein  so  hervorra¬ 
gendes  Hilfsmittel  in  die 
Hände  bekommen  habe, 
möchte  ich  gerne  mal  ein 
paar  Wünsche  und  Anregun¬ 
gen  bei  Euch  loswerden. 

Als  erstes  habe  ich  Eure  An¬ 


regung  aufgegriffen  und 
Context  an  den  Star  SG-10 
angepaßt.  Hier  nun  die  paar 
Zeilen,  die  geändert  wer¬ 
den  müssen: 

1340  POKE  nlq,4:GOSUB 
1830.GOTO  1290 
1350  POKE  nlq,5:GOSUB 
1830.GOTO  1290 
1390 POKE  mzei,n:POKE 
cabs,  1536/n:GOSUB  1850: 
GOTO  1290 

Außerdem  müssen  im  Ma¬ 
schinenspracheteil  (Block 
25)  zwei  Steuercodes  (für 
NLQ)  geändert  werden.  Am 
einfachsten  ist  es,  meiner 
Meinung  nach,  den  Binär¬ 
teil  zu  laden: 

(MEMOR  Y &92FF.LOAD 
"CONTEXT.BIN”,  & 9300), 
die  beiden  neuen  Werte  mit 
POKE  einzubinden 


(POKE  &9F  1B.&42-.POKE 
&9F30.&42) 

und  den  Binärteil  wieder 
neu  abzuspeichern 
(SA  VE” CONTEXT.BIN”,  b, 
&9300.&D00). 

Außerdem  schlage  ich  allen 
Benutzern  von  Grünmonito¬ 
ren  vor,  folgende  Zeilen  zu 
ändern,  um  leichter  im 
Menue  zu  erkennen,  ob  bei 
der  Druckeransteuerung 
” Brief qualität”  oder  "Ent¬ 
wurfsdruck”  gewählt  wurde. 
220  MODE  LBORDER 
O.INK  0,0: INK  1,18  INK 
2,13:INK  3,6 
1830  xyz-PEEK(nlq)-4: 
PEN  2-xyz:LOCA  TE  1 6, 4: 
PRINT’  'Briefqualität 
1840  PEN  l+xyz:LO- 
CA  TE  16, 6  :PRINT” Ent¬ 
wurf  sdruck”:RETURN 
Ich  persönlich  würde  mich 
darüber  freuen,  wenn  es  je¬ 
manden  gelingen  würde,  ein 
weiteres  Steuerzeichen  in 
dem  Programm  unter¬ 
zubringen  (z.B.  für  Kursiv¬ 
schrift).  Jürgen  Hooß 
Wiesbaden 


Context 

Herzlichen  Glückwunsch  an 
Matthias  Uphoff.  Das  Pro¬ 
gramm  CONTEXT  ist  her¬ 


vorragend,  und  für  Leute,  die 
ein  Textverarbeitungspro¬ 
gramm  lieber  abtippen  und 
auf  die  Disc-Station  sparen, 
das  Programm  (s.  Listing  2). 
Doch  leider  hatte  die  Sache 
einen  kleinen  Haken,  dem  ich 
nicht  so  ganz  auf die  Spur  ge¬ 
kommen  bin.  Der  Haken  ist 
der  variable  Zeilenvorschub, 
der  beim  ML182  mit  einem 
4-Byte-Befehl  behandelt  wird. 
Daran  schließt  sich  logischer¬ 
weise  auch  meine  Frage  nach 
einer  Möglichkeit,  wie  ich 
diesen  Befehl  in  das  Pro¬ 
gramm  mit  einbeziehen  kann. 
Die  Befehlssequenz  lautet: 
ESC  %  9n 

ehr $(2  7)chr%(3  7)chr%(5  7) 
chr$(n) 

wobei  n/144  Zoll  angegeben 
wird. 


Listing  1 

541  ÜLS:  PEN  1:  WINDOW  3,40,1,24:  WINDOW  1,40,1,25 

I  I 

Ursprünglich,:  CALL  cata  : 
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imimiiiimiiiimiimimi 


. . mim . . . mm 


. Briefe 


Vielleicht  könnte  Herr  Uphoff 
einen  Tip  geben,  wie  man  die¬ 
se  Tabelle  verschieben  kann, 
ohne  gleich  das  ganze  MC- 
Programm  neu  schreiben  zu 
müssen.  Dies  fällt  mir  recht 
schwer,  weil  ich  nur  wenig 
Beziehung  zur  Maschinen¬ 
sprachehabe.  Über  eine  bal¬ 
dige  Antwort  würde  ich  mich 
sehr  freuen,  da  ich  dieses 
Programm  als  ” Studium- 
Begleiter”  haben  möchte. 
Vielen  Dank  für  Ihre  Bemü¬ 
hungen  schon  im  voraus. 

Hans-Martin  Souchon 
Johannes-Palm-Str.  83 
7900  Ulm  10 


oder  doch  neu  sind. 

1.  Jahresübersicht 

Eine  gute  Arbeit  mit  den  von 
Ihrer  Zeitschrift  gelieferten 
Programmen,  Tips  und  Tricks 
ist  nur  möglich,  wenn  man 
alle  irgendwann  einmal  ver¬ 
öffentlichten  Sachen  schnell 
wiederfindet;  alles  kann  man 
nicht  im  Kopf  behalten! 

Ich  vermisse  daher  ein  eini¬ 
germaßen  ausführliches 
Jahresverzeichnis,  das  so 
eine  Suche  bedeutend  er¬ 
leichtern  könnte!  Vielleicht 
kann  man  da  noch  etwas 
machen?!? 

2.  Programmlokation 


Fall.  Zwar  ist  es  unzweck¬ 
mäßig,  alle  Tips  und  Tricks 
separat  in  der  Mitte  zusam¬ 
menzufassen  (denn  dann 
wäre  das  restliche  Heft  nur 
noch  aus  Werbung  und  Be¬ 
richt  bestehend),  aber  grö¬ 
ßere  und  umfangreiche  Pro¬ 
gramme,  wie  z.B.  Context, 
könnten  durchaus  dort  Platz 
finden.  Solche  herausnehm¬ 
baren  Programme  könnten 
dann  die  Grundlage  einer 
persönlichen  Programmbi¬ 
bliothekbilden.  M.E.  wäre  es 
sogar  möglich,  diese  Pro¬ 
gramme  dann  in  billigerer 
Papierqualität  zu  drucken 


CONTEXT  ANPASSUNG  AN 
OK  X  DAT  A  MX132  STD-NLQ 
Das  Programm  muß  mit  den  angegebenen  Zeilennummern  abgetippt 
werden,  da  es  mit  MERGE""  zugeladen  wird.  Mit  GOTO  3000  wird 
die  kleine  POKE-Routine  gestartet.  Danach  braucht  nur  noch 
DELETE  3000-  eingegeben  zu  werden,  fertig.  Nur  noch  das  neue 
CONTEXT  abspeichern  und  vorsichtshalber  die  Seite  5 
löschen, denn  da  kommt  das  Zusatzprogramm  zu  liegen. 


Durch  die  Anpassung  haben  sich  die  Werte  für  die 
Dreiecksbelegung  verändert.  Die  neuen  Werte  sind  für  eigene 
Kombinationen : 

1  =  •up-'-Mript  <  Exponent) 

2  =  Condensed  <17,1  CPI) 

4  =«mph*®»d < vert . Verdoppelung) 

6  =doublestr ike  <horiz.  Verdoppelung) 

16  =  (Index) 

Die  Werte  können  vor  dem  Start  der  POKE-Routine  in  den 
2eilen  3030-3060  geändert  werden. 

Zeile  3090  läuft  als  Kontrolle  der  Druckertabelle  voK&9fll- 
&9f49.  Der  Zeilenabstand  ist  zwischen  1.3  und  0.4mm 
umschaltbar . 


Listing  2 

SB  cas i n=&9E0£ : cat a=R9E3E : cset  =  &9F 15: cabs=&9F 18: n lq=&9F 1 C  C35S£3 

££0  MODE  1 : 80RDER  0:INK  0,0: INK  1,£6:INK  2,  13s  INK  3,6  C24073 

1340  PORE  nlq-1, 49: PORE  rtlq,  1:60SUB  1830:GOTO  1£90  C27573 

1350  PORE  nlq-1, 48:P0RE  r.lq,0:GOSUB  1830:6010  1£90  C32793 

1360  IF  PEER (caet ) =0  THEN  PORE  cset - 1 , £7 : PORE  cset,33:PQKE  cset+1,67  ELS  C891B3 
E  PORE  cset -1, £4 :P0RE  cset, 0: PORE  cset +1,0 

1380  n=PEEK (mzei ) +£4 : IF  n> 96  THEN  n=7£:zab=54  ELSE  zab=56  C45£83 

1390  PORE  rnzei ,  n : PORE  cabs,  zab : GOSUB  1850:SOTO  1£90  C32753 

1870  LOCATE  El,  13:PRINT"1.  3" sLOCATE  £0,  14:PRINT  "  64": RETURN  C£0053 

1890  IF  PEER (cset ) =0  THEN  PEN  1 : PRINT" I" : PEN  2  ELSE  PRINT“D"  C3S923 

1920  IF  PEER < cset >=0  THEN  £050  CI £973 

3000  RESTORE  3070  C7373 

3010  PORE  & 93££, 72  [6013 

30£0  FOR  schlei fe=49F 11  TO  &9F49:READ  a :P0KE  sch  lei fe, a : NEXT Druckertab  C60823 
eile 

3030  PORE  &9F4A,  3:1  dreiecksbelegung  Choch+cortdensed  f\>  3  C51203 

3040  PORE  &9F4B, 18 : * t i ef +condensed  {/>  C29693 

3050  PORE  &9F4C,  12 :  ’  emphased+double  strike  -C )  >  C36813 

3060  PORE  &9F4D,  £:’ Condensed  -CO  C10823 


3070  DATA  £7,  69,  49,  £7,  33,  48,  £7,  54,  0,  £7,  48,  0,  £7,  68,  0,  30,  0,  0,  30,  0,  0,  £7,  73,  C79363 
0,  £7,  75,  0,  £7,  77,  0,  £7,  48,  0,  £7,  67,  0,  31 , 0,  0,  £9,  0,  0,  £7,  72,  0,  £7,  84,  0,  27,  74,  0, 

£7,  76,  0,  13,  10,  £55 

3080  FOR  i=&9F 1 1  TO  &9F47  STEP  3:PRINT  HEX*<i);:F0R  z=0  TO  £:PRINT  PEER <  C69783 
i+z), :NEXT :PRINT :NEXT 

3090  FOR  i =&9F I 1  TO  «9F47  STEP  3:PRINT  HEXS<i);:F0R  z=0  TO  £:PRINT  PEER <  C69783 
i+z),  :NEXT  sPRINT :NEXT 


Anregungen 

Als  begeisterter  CPC-Leser, 
der  (fast)  von  Anfang  an 
dabei  ist,  möchte  ich  zu 
Ihrer  Zeitschrift  ein  paar 
Verbessern  ngs  Vorschläge 
machen,  die  vielleicht  be¬ 
reits  andere  gemacht  haben 


Wenn  man  andere  Home¬ 
computer-Zeitschriften  be¬ 
trachtet,  so  fälltauf,  daß  diese 
ihre  jeweiligen  gerätespezifi¬ 
schen  Listings,  z.B.:  C64, 
Schneider  usw.,  in  der  Mitte 
zum  Herausnehmen  und 
Sammeln  haben.  Bei  der 
CPC  ist  dies  leider  nicht  der 


und  somit  Kosten  sparen. 

3.  Sammelordner 
Wieder  ein  Punkt  für  den 
Sammler:  Es  gibt  nichts 
schlimmeres  als  Unordnung! 
Wie  man  verzweifeln  kann, 
wenn  man  weiß,,  wo  etwas 
steht,  aber  man  findet  das 
betreffende  Heft  nicht!  Hier 


SEK  ELEKTRO  GMBH 
DtlSTtRUlQ  STUASSC  23 
5800  HAOiH 
V  02331/72008 


NEU  NEU  NEU 

Ciapitar  24  Knut*  «Irti«,  statt  kiitai. 
Jttzt  kiifn,  ui  Ir  I  Mnitn  ktzikltR. 


Schneider  Joyce 


Schneider  Joyce 
Plus 


Seikosha 
SP  1000  CPC 


Mietpreis 

Kaulpreis 

Mietpreis 

Kaulpreis 

Mietpreis 

Kaulpreis 


83,- 
1 749,- 


117,- 

2444,- 


39,- 

800,- 


Selbstverständlich  sind  auch  alle  anderen 


Schneider-Geräte  zu  mieten 

SPIELE 
Monopoly 
Saboteur 
Arnhem 
Dun  Durach 
Computer-Hits  6 


Cyrus  Chess 
Sweevo's  World 
N.OMAD 
They  sok)  a  Million 
Tornado  Low  Level 
Winiergames 
Cillapede 
Trollie  Waltie 
Nuclear  Heist 
Meltdown 
Saboteur! 

Turbo  Esprit 
Tomahawk 
Golden  Path 
Doors  of  Doom 
They  sold  a  Million  I 


Cass  39,90 
Cass  35, — 
Cass  15,80 
Cass  15,80 
Disk  39,85 
Disk  39,85 
Disk  39,85 
Cass  29,95 
Disk  43,50 
Disk  37,50 
Cass /Disk  39,90/54,95 
Cass  9.50 
Cass  9,50 
Cass  9,50 
Cass  29,95 
Disk  54,95 
Disk  54,95 
Disk  54,95 
Disk  49  95 
Disk  49,95 
Disk  49,95 


Ständig  die  neuesten  Spiele  für  die  Schneider  CPC 
lieferbar  Viele  Sonderangebote 
Katalog  gegen  Rückporto  (1,-  DM  in  Briefmarken) 
Sämtliche  Lieferungen  erfolgen  zzgl  Porto  +  Verp 


MIT  EINEM  SCHNEIDER  CPC  fNTERNATIONAl 
ABONNEMENT  BEKOMMEN  SIE.  WAS  IHR  CPC 
BRAUCHT  JEDEN  MONAT  NEU. 
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Brief© . . . 

bieten  sich  Sammelordner  an! 
Nun  gibt  es  ja  für  fast  alle 
gängigen  Zeitschriften  Sam¬ 
melordner  mit  Rückenauf¬ 
druck.  Auch  neutrale  Ordner 
gibt  es,  die  man  universell 
verwenden  kann.  Nur  machen 
Sie  hier  mit  Ihrer  dauernd 
wechselnden  Umfangsände¬ 
rung  dem  Ganzen  einen  Strich 
durch  die  Rechnung!  Die  stei¬ 
gende  Zahl  der  Seiten  kann 
ich  einerseits  nur  begrüßen, 
doch  andererseits  verhindert 
es  die  Benutzung  von  solch 
neutralen  Sammelordnem. 
Hier  wäre  es  bestimmt  emp¬ 
fehlenswert,  wenn  Sie  solche 
Ordner  anbieten  würden?! 

4.  Rückblick 

Es  ist  klar,  daß  viele  Pro¬ 
gramme  einer  Verbesserung 
bedürfen,  welche  sich  aus  dem 
Gespräch  mit  dem  Benutzer 
ergeben.  Hier  wäre  es  be¬ 
stimmtvorteilhaft  wenn  man 
in  einer  eigenen  Spalte  alle 
Verbesserungen,  Druckfeh¬ 
lerberichtigungen  usw.  ver¬ 
öffentlichen  würde,  damit 
man  nicht  die  Übersicht  ver¬ 
liert! 

Ich  hoffe,  daß  meine  Anre¬ 
gungen  nicht  auf  taube 
Ohren  stoßen. 

Dipl. Kfm.  Gerhard  E. 

Schoen 

Hann.-Münden 


CPC* 

Zu  1)  Eine  Jahresübersicht 
wird  es  am  Ende  dieses  Jah¬ 
res  geben. 

Zu  2)  Aufgrund  techn. 
Gründe  des  Drucks  (Farb- 
und  S/W-Seiten)  ist  eine 
Zusammenfassung  leider 
nicht  möglich.  Auf  billigem 
Papier  zu  drucken,  überlas¬ 
sen  wir  anderen  Zeitschrif¬ 
ten. 

Zu  3)  Es  ist  geplant,  zum 
Jahresende  ebenfalls  einen 
Sammelordner  anzubieten. 
Zu  4)  Diese  Anregung  neh¬ 
men  wir  gerne  auf.  Wir  be¬ 
mühen  uns,  Verbesserun¬ 
gen  oder  Ergänzungen  im 
Leserbrief-Teil  zu  veröffent¬ 
lichen,  da  diese  Beiträge 
ausschließlich  von  unseren 
Lesern  stammen. 

Änderungsvor¬ 
schlag  xu  Context 


Hier  mein  Änderungsvor- 
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schlag  von  Context  in  Verbin¬ 
dung  mit  dem  Drucker 
Star  SG- 10: 

1.  &9F14  DB  27,55,n  Zei¬ 
chensatz  Deutsch  n~2, 
Intern,  n—0 

d.h.  Pokein  Zeile  135,  Än¬ 
derung  in  Zeile  80, 1360, 
1890,  1920 

2.  &9F1ADB  27,66, nNLQ 
ein  n—4,  aus  n=5 

d.h.  Poke  in  Zeile  135, 
Änderung  in  Zeile  1340, 
1350,  1830,  1840 

3.  &9F2F DB  27,66,5 
NLQ  aus 

d.h.  Poke  in  Zeile  135 

4.  Zeilenabstand  n/144  inch 
d.h.  Poke  in  Zeile  135, 
Wert  in  Zeile  1390 
ändern 

5.  NLQ-Abfrage  in  Adresse 
&9F17  statt  (AND  1) 
(XOR  5)  poken 

d.h.  Poke  in  Zeile  135 
(siehe  auch  Listing  3). 

Von  Vorteil  wäre  ein  Form- 
Feed  am  Ende  jeder  Seite, 
damit  ein  neuer  Ausdruck  an 
der  richtigen  Stelle  anfängt. 
Leider  konnte  ich  das  nicht 
herausfinden. 

Peter  Meusel 
Herborn 


Druckertest 
Selkosha  SP- 1000 
CPC 

Als  Besitzer  eines  Druckers 
Seikosha  SP-1000  CPC 
kann  ich  die  in  dem  Test  ge¬ 
machten  Erfahrungen  durch¬ 
aus  bestätigen.  Genauso  wie 
den  Testern  mißfiel  mir  zu¬ 


nächst,  daß  die  gängigen 
Hardcopy-Routinen  nicht 
funktionierten. 

Die  Ursache  für  dieses  Pro¬ 
blem  liegt  an  einem  Fehler  im 
Handbuch  bzw.  auf  seiten 
der  Hardware. 

Die  Anzahl  der  Horizontal¬ 
punkte  im  Grafikdruckmo¬ 
dus  berechnet  sich  nicht  wie 
üblich  ( und  auch  so  im  Hand¬ 
buch  beschrieben)  aus  Low- 
byte+Highbyte*256,  sondern 
aus  Lowbyte+Highbyte*  128. 
Somit  muß  zur  Anpassung 
der  Hardcopy-Routinen  in 
den  ESC-Sequenzen  der  Wert 
des  Highbytes  verdoppelt  wer¬ 
den. 

Inden  Listings  1  und  2  finden 
Sie  noch  den  Basic-Laderfur 
eine  an  den  Seikosha  SP- 
1000  CPC  angepaßte  Hard¬ 
copy. 

Joachim  Hörner, 
Karlsdorf 

DMP  2000 

Hiermit  möchte  ich  ein  paar 
Zeilen  zum  Leserbrief  des 
Herrn  Wolfgang  Hofmann 
(München),  in  Ausgabe  5/86, 
Erfahrungsbericht  des  Schnei¬ 
der  DMP  2000  schreiben. 
Zu  der  ersten  Frage: 

Es  ist  nicht  möglich,  überden 
CPC  die  Schneider  Sonder¬ 
zeichen  128  -  256  mit  dem 
DMP  2000  Drucker  auszu¬ 
geben.  Da,  wie  Sie  sicher 
wissen,  der  CPC  nur  über 
eine  7 -Bit-Schnittstelle  ver¬ 
fugt,  kann  dieser  nur  die  Zei¬ 
chen  32-127  an  den  DMP 
2000  übergeben.  Der  DMP 


2000  kann  zwar  das  achte 
Bit  simulieren,  doch  hilft  das 
keineswegs  weiter.  Des  Rät¬ 
sels  Lösung  lautet  leider.  Der 
DMP  2000  kann  höchst¬ 
wahrscheinlich  keine  Schnei¬ 
der-Sonderzeichen. 

Jetzt  möchte  ich  auf  Ihre 
Hardwarebastelei  in  Ausga¬ 
be  5/86  ”Das  achte  Bit” zu¬ 
rückkommen.  Natürlich  nur 
in  Bezug  auf  den  DMP 2000. 
Nachdem  ich  die  Hardware¬ 
bastelei  (aus  dem  ersten  Son¬ 
derheft  v.  Happy  Computer) 
schon  im  März  dieses  Jahres 
an  meinem  Rechner  vomahm 
und  dieser  nur  mit  einem 
KURSIVEN  Schriftbild  rea¬ 
gierte,  und  nicht,  wie  ange¬ 
geben,  mit  den  Sonderzeichen 
128  -255,  schrieb  ich  kurz 
darauf  an  die  o.a.  Redak¬ 
tion.  Die  Redaktion  antwor¬ 
tete  mir  mir  folgendem  Wort¬ 
laut: 

”Der  Grund,  warum  die 
Bastelei  mit  Ihrem  Drucker 
Schwierigkeiten  macht,  ist 
ein  an  den  CPC  speziell  an¬ 
gepaßter  Drucker,  bei  dem 
das  achte  Datenbit  einfach 
fehlt.  Es  sind  somit  die  Be¬ 
sitzer  derjenigen  Drucker  an¬ 
gesprochen,  bei  denen  das 
achte  Datenbit  auch  verwen¬ 
det  wird.  So  ist  es  nicht  ver¬ 
wunderlich,  daß  es  in  Ihrem 
Fall  zu  einer  Fehlfunktion 
kommt.” 

Ich  möchte  dazu  noch  bemer¬ 
ken,  daß  ein  Listing  zum  Ab¬ 
tippen  und  die  Lötstellen 
korrekt  ausgeführt  wurden. 
Der  Grund  meines  Briefes  ist 
der,  daß  die  Besitzer  eines 
DMP  2000  davor  gewarnt 


Listing  3 

BO  casin-SBEOE: cata-&3£3E : csBt-&9F15 : cabs-BBFlB: nlq=&3FlC 
135  POKE  &9C17 , 238  :  POKE  &3C1B.5  :  POKE  cabs,28  :  POKE  &3F15,55 
:  POKE  B3F16 , 2  :  PDKE  S9F1B.5G  :  POKE  &3F1C.4  :  POKE  &9F30,66  :  P 
OKE  83F31.5 

1340  POKE  nlq,4_:G0SUB  1830:  GOTO  1230 
1350  POKE  nlq  J5  : GOSUB  1830: GOTO  1230 

1360  IF  PEEKCcsBt  )=_0  THEN  POKE  cset.^ELSE  POKE  cset.fl. 

1830  IF  PEEKCcsetD-0  THEN  PRINT”I”  ELSE  PRINT”D” 

1320  IF  PEEKCcset 3=Q.  THEN  2050 

Für  Farbmonitor: 

1830  PEN  2-FEEKCnlq)+4: LOCftTE  16 , 4 : PRINT”Br iefqual ität " 

1840  PEN  _l+PEEKCnlq3^4 : LOCATE  16 , 6 : PRINT”Entwurf sdruck " : RETURN 

Für  Srünmonitor: 

1830  PEN  3-CPEEKCnlq3-43*2 : LQCflTE  16, 4 : PRINT”Brief qualität ” 

1B40  PEN  l+CPEEKCnla3-43*2: LDCftTE  16,6: PR INT "Entwurf sdruck ” : RETUR 
N 


1 1 1 1 1 1 II 


1 1 1 1 1 1 II 1 1 II 1 1 


II II I I I 


111111111114111 


1 1 1 1 1 1 IIIIIIH  1 1 1 1 1 1 III 1 1 1 1 1 1 1  IIIIIM  I II II 1 1 1 1  HIIIIIIIH  1 1 1 


. Briefe 


Listing  1 


10  "  Hardcopy  fuer  Seikasha  SP-1000CPC  C9113 
20  '  Aufruf  mit  'call  &A000,yl,y2  [16663 

30  '  yl=untere  Pixelkoord.  (min.  1)  C20203 

40  '  y2=obere  Pixelkoord.  (max.400)  [9313 

50  HEKOKY  &9FFF  [1343 

60  FOR  adr=&A000  TO  &A072  [10763 

70  READ  aS:POKE  adr,  VAL  (’’&"+&*)  1 17123 

60  HEXT  adr: END  C9743 

90  DATA  FE, 02, c0, eb, dd, 5e, 02, dd  [10403 

100  DATA  56, 03, e5, a7, ed, 52, 30, 02  [12883 

110  DATA  el, c9, 21, 6b, a0, cd,5f , n0  [11313 

120  DATA  11,01,00,61,06,00,06,51  [9073 

130  DATA  a0, 28, 02, cb, d9, cd, 51, a0  [17673 

140  DATA  28, 02, cb, dl , cd, 51 , a0 , 28  [15203 

150  DATA  02, cb, c9, cd, 51 , a0, 28, 02  [13753 

160  DATA  cb, cl , 79, cd, 2b, bd, 30, fa  [19Q93 

170  DATA  13, e5, 21, 80, 02, a7, ed, 52  [16463 

180  DATA  e 1 , 28 , b9 , 0 1 , 08 , 00 , 09 , 18  [15983 

190  DATA  cb, d5, e5, c5, cd, f0, bb, cl  [16543 

200  DATA  el, dl, 2b, 2b, fe, 00, c9, 46  £14963 

210  DATA  23, 7e, cd, 2b, bd, 30, fa, 23  £10773 

220  DATA  10, f7,c9,07, lb,4a,0c, lb  [11843 

230  DATA  4c, 7f , 04  £6213 


werden  müssen  und  nicht  die¬ 
selbe  Dummheit  begehen  wie 
ich.  Ich  hoffe,  Ihnen  und  den 
Lesern  Ihrer  Zeitschrift  da¬ 
mit  etwas  geholfen  zu  ha¬ 
ben. 

Jürgen  Sieveneck, 
Dinslaken 

LIGA  l.l 

Auch  ich  bin  über  zwei  Druk- 
kerfehler  im  Sonderheft  1/86 
gestolpert.  Im  Anwenderpro¬ 
gramm  LIGA  I.I  von  Gerd 
Brinkmann  aus  Ankum  ist  in 
Zeile  1030  ein  Komma  zu¬ 
viel;  diese  Zeile  muß  also 
lauten: 

1030  CLS.IF  n$(0)  <  > 
’THEN  INPUT’ Wol¬ 
len  Sie  gespeicherte 
Daten  löschen  ?(J/N): 
\a%:IF  UPPER%(a%)= 
’J’  THEN  Spieltage 
0:absspi=0:ERASE 
tor, pun, platz,  statis,  spa, 
serg:DIM  tor(19, 1), 
pun(19,  l),platz(  19,1), 
statis( 1 9, 38),spa(762), 
serg(762) 


Weiterhin  wird  die  Variable 
CURSOR  verwendet.  Diese 
stellt  beim  CPC  6128  den 
System-  bzw.  Benutzerschal¬ 
ter  für  den  Cursor  auf  ”  Ein” 
oder  "Aus”.  Also  muß  man  in 
den  folgenden  Zeilen  an  die 
Variable  ein  ’P’  anhängen: 
2390,2400,2420,2490,8090, 
8100,8110,8130,8180,8200, 
8210, 8220,8230,8240,8260 
Markus  Schneider, 
Meerbusch 


Nachtrag  zu 
„Anpassung  des 
Programms 
Context” 

Beim  Druckertest  ist  mir  lei¬ 
der  ein  Fehler  unterlaufen. 
Nach  der  Umschaltung  auf 
verdichtete  Zeichen  geht  der 
Drucker  nicht  mehr  in  den 
alten  Druckmodus  zurück. 
Deshalb  muß  nach  der  ver¬ 
dichteten  Schrift,  die  mit 
Vorgesetztem  Steuerzeichen: 
CTRL  (Dreieck  nach 
links)  eingeschaltet  wird,  an¬ 
schließend  das  Steuerzeichen 
CTRL  /  (Dreieck  nach 
unten)  gesetzt  werden. 

Bei  Entwurfsdruck  wird  ver¬ 
dichtete  Schrift  mit  dem 
Steuerzeichen  "Dreieck  nach 
oben  ’’  ausgeschaltet. 

Ich  bitte  Sie,  mein  Versehen 
zu  entschuldigen. 

Zusätzlich  noch  die  Tabelle 


&9F  1 1 

27 

&9F12 

= 

&9F14 

- 

27 

S<9F  1 5 

= 

&9F17 

= 

27 

?<9F  1 8 

= 

&9F1A 

= 

27 

?<9F  1 B 

= 

&9F1D 

= 

27 

?<9F  1 E 

= 

&9F20 

= 

20 

?<9F21 

= 

&9F23 

= 

18 

&9F24 

= 

&9F26 

= 

0 

&9F27 

= 

&9F29 

= 

0 

&9F2A 

= 

&9F2C 

= 

27 

&9F2D 

= 

S<9F2F 

= 

0 

?<9F30 

= 

&9F32 

- 

0 

&9F33 

= 

?<9F35 

= 

14 

&9F36 

= 

&9F3B 

= 

27 

?<9F39 

= 

&9F3B 

= 

18 

&9F3C 

= 

&9F3E 

= 

27 

&9F3F 

= 

S*9F41 

= 

27 

&9F42 

= 

&9F44 

= 

27 

&9F45 

= 

&9F47 

= 

13 

&9F48 

= 

ab  &9F11  (siehe  Speicher¬ 
stellen:) 

Ich  hoffe,  damit  die  Mög¬ 
lichkeiten  des  EPSON  MX 
80F/T  ausgeschöpft  zu 
haben. 

Helmut  Hölzgen 
Neustadt/D 

Erweiterung 

Die  Preisgestaltung  der  Fir¬ 
ma  Vortex  in  Sachen  Auf¬ 
rüstsätze für  ihreSP-64/256 
RAM-Cards  kann  sicherlich 
nicht  unbedingt  zum  Kauf 
dieser  Aufrüstsätze  anreizen. 
Ich  habe  mich  daher  auf  die 
Suche  nach  passenden  Spei¬ 
cherchips  gemacht  und  habe 
nun  meine  SP-64  zum  Preis 
von  DM  66, 10  um  256K auf 
320K  erweitert. 

Notwendig  dazu  sind: 

8  Stck.  Speicherchips  Typ 
41256P-15  oder50256P-15 
( die  unterschiedliche  Bezeich¬ 
nung  ist  unbeachtlich,  da  sie 
lediglich  eine  Herstellerun¬ 
terscheidung  darstellt:  4L. 
—NEC;  50...  =Mitsubish i). 
Zusätzlich  ist  ein  weiterer 
Speicherverwaltungschip  vom 
Typ  74HCT373,  wie  er  be¬ 
reits  einmal  auf  der  Karte 
enthalten  ist,  erforderlich. 
Da  die  Aufrüstsätze  von 
Vortex  auch  keinerlei  andere 
Vorteile  bieten  (sie  enthalten 
noch  nicht  einmal  eine  Ein¬ 
bauanleitung),  ist  es  nicht 
erforderlich,  die  Original¬ 
sätze  zu  benutzen. 

Zum  Einbau: 

Einfach  die  neuen  256K- 
Chips  in  gleicher  Weise  ein¬ 
stecken,  wie  die  bereits  auf 
der  Karte  befindlichen.  Den 

56  ?<9F  1 3 

54  &9F16 

65  &9F 1 9 

50  &9F1C 

69  &9F1F 

O  &9F22 

0  &9F25 

O  &9F28 

O  &9F2B 

72  &9F2E 

O  ?<9F3 1 

O  &9F34 

0  &9F37 

70  &9F3A 

O  ?<9F3D 

69  &9F40 

69  5<9F43 

71 

IO 


HCT-Chip  in  den  freien 
Sockel  neben  den  ersten  stek- 
ken  (Kerbe  in  die  gleiche 
Richtung  wie  beim  bereits 
vorhandenen  Chip). 

Eine  kleine  Schwierigkeit 
könnte  die  Beschaffung  des 
HCT-Chips  bereiten.  Ich 
selbst  habe  auf  der  Suche 
nach  einem  Anbieter  in  der 
ganzen  Bundesrepublik  her¬ 
umtelefoniert,  bis  ich  eine 
Bezugsquelle  gefunden  hat¬ 
te. 

Bei  Beschaffungsproblemen 
mit  dem  HCT  bin  ich  daher 
(gegen  Rückporto)  bereit, 
diese  Bezugsquelle  nachzu¬ 
weisen. 

Arndt  Schalk, 
Hünnebecker  Str.  6 

5802  Wetter  2 

Knack  die  Nuß 

Ich  habe  folgenden  Vorschlag 
zum  Programm  ” Geflügel - 
salat”:  Es  ist  nicht  nötig,  drei 
ineinandergeschachtelte 
Schleifen  zu  benutzen.  Die 
dritte  Variable  kann  mit  der 
Zeile: 

90  k=100-e-h 

ermittelt  werden.  Dadurch 
können  die  Zeilen  100  und 
120  wegfallen.  Auf  diese 
Weise  verringert  sich  die 
Rechenzeit  von  ca.  14  sek. 
auf  2,2  sek.  Noch  sinnvoller 
ist  es,  die  längste  Schleife 
(Zeile  80)  wegzulassen  und 
durch  h=100-e-k  zu  ermit¬ 
teln.  Dadurch  verringert  sich 
die  Rechenzeit  auf  ca.  0, 7  sek. 

Jan  Förster, 

Amsterdam 


&9F46 

&9F49 


(Papiermangel  übergehn  ) 
(Zeichensatz  D  oder  I  > 
(Momentaner  Zeilenabstand) 
(Exekutkomm.  "  ) 

(Einstellung  Briefqual it „ ) 
(Großschrift  ausschalten  ) 
(Condensed  "  ) 


0 
O 
12 
O 
0 
o 
0 
o 
0 
0 
0 
o 
o 

15  (Condensed  einschalten 
0  (Condensed  ausschalten 
O  (Brief quäl ität  zurückhol 
0  (  "  einschalt 

=  O  (Doppel anscb lag  ein 
=  255  (Zeilenende) 


(Doppel anschlag  aus 


7  ’86  CPC  11 


Schneider  Aktuell 


. . IM  * 


Mouse-Pack 

erweitert 

Das  bereits  in  Ausgabe  5/86 
vorgestellte  Mouse-Pack  der 
Fa.  Gerdes  wurde  inzwi¬ 
schen  um  das  Grafikpro¬ 
gramm  Centaur  erweitert. 
Somit  ist  das  im  Test  bean¬ 
standete  Manko  behoben; 
der  Hersteller  hat  schnell¬ 
stens  reagiert. 

Besitzer  der  älteren  Version 
können  das  Grafikprogramm 
Centaur  gegen  Einsendung 
einer  Diskette  beim  Herstel¬ 
ler  anfordern  bzw.  im  Han¬ 
del  Umtauschen. 

Info:  Fa.  Gerdes 

5300  Bonn  □ 


Hl  soft  C  und  Pascal 
mit 

GSX-Schnlttstelle 

Die  bekannten  C-  und  Pas¬ 
cal-Compiler  von  Hisoft 
sind  um  eine  GSX-Schnitt¬ 
stelle  erweitert  worden.  So¬ 
mit  können  CPC  6128-  und 
Joyce-Benutzer  auf  diese 
grafische  Schnittstelle  zu¬ 
greifen.  In  England  startet 
Hisoft  zur  Zeit  eine  Um¬ 
tauschaktion  der  älteren 
Versionen;  gegen  Rücksen¬ 
dung  des  Originals  sowie 
Überweisung  von  £  10  ist  die 
Update-Version  erhältlich. 
Wie  diese  Aktion  bei  uns 
aussehen  wird,  war  bei  Re¬ 
daktionsschluß  noch  nicht 
geklärt.  □ 

Vector-Update 

Das  von  der  Fa.  Vortex  ver¬ 
triebene  Programm  Vector 
wurde  um  einige  hervorra¬ 
gende  Leistungsmerkmale 
erweitert.  Das  ohnehin  zu 
dem  von  Schneider  vertrie¬ 
benen  Topcalc  kompatible 
Programm  ist  nun  auch  in 
der  Lage,  Multiplan-Dateien 
grafisch  zu  verarbeiten. 
Dazu  wurde  das  Unterpro¬ 
gramm  Readmp  implemen¬ 
tiert  Des  weiteren  wurde  das 
Programm  Vector  an  sich 
völlig  überarbeitet,  was  vor 
allem  der  Bedienungsfreund- 
lichkeit  zugute  kommt.  So 
erlauben  z.B.  die  Zoom- 
Funktionen  beliebige  Aus¬ 
schnittsvergrößerungen. 
Weiterhin  besteht  eine 


Schnittstelle  zum  Einlesen 
von  bis  zu  700  x/y-Daten  aus 
Anwenderprogrammen. 
Info:  Vortex 

7 106  Neuenstadt  5  □ 


Joyce- 

Tralnlngssemlnare 

Tages-  und  Wochenend¬ 
seminare  für  Joyce-Schulun¬ 
gen  werden  jetzt  von  der  Fa. 
Leidinger  &  Haupenthal  an- 
geboten.  Neben  LocoScript- 
Training  stehen  vor  allem 
die  vielfältigen  Einsatzmög¬ 
lichkeiten  des  Joyce  auf  dem 
Programm.  Des  weiteren  wird 
die  vorhandene  Software  im 
Überblick  vorgestellt. 

Die  Seminare  finden  bun¬ 
desweit  statt;  spezielle,  wei¬ 
terführende  Kurse  sind  ge¬ 
plant. 

Info: 

Leidinger  &  Haupenthal 
6696  Nonnweiler  □ 


Computer-Auktion 

Im  Juli  1986  findet  in 
München  die  erste  deutsche 
Versteigerung  gebrauchter 
Computeranlagen  statt. 
Rechner  aller  Typen,  Kapa¬ 
zitäten  und  Preisklassen 
werden  für  diese  Groß-Auk- 
tion  akzeptiert.  Firmen  so¬ 
wie  Privatleute,  die  daran 
denken,  für  Ihren  Micro-  bis 
zum  Großrechner  für  ge¬ 
brauchte  Anlagen  einen  gu¬ 
ten  Preis  zu  erzielen,  sollten 
sich  kurzfristig  mit  dem  Ver¬ 
anstalter  in  Verbindung  set¬ 
zen. 

Info:  Auktionator  Gus 
Schiele 

8000  München  2  □ 


Joyce-Zubehör 

Mehrere  nützliche  Zube¬ 
hörteile  für  den  Joyce  kom¬ 
men  in  Kürze  in  den  Handel. 
Zunächst  wird  es  eine  zu¬ 
sätzliche  Papierführung  für 
den  Drucker  geben,  der  ein 
exaktes  Positionieren  des 
Papiers  erlaubt  (VK  ca. 
DM  39,-). 

Des  weiteren  werden  neben 
Bildschirmfiltern  für  alle 
Schneider-Modelle  auch 
zwei  Software-Pakete  ange¬ 


boten.  Zum  einen  handelt  es 
sich  um  ein  Konvertierpro¬ 
gramm,  mit  dem  Texte  des 
Schreibautomaten  TA  1041 
mit  dem  Joyce  weiterverar¬ 
beitet  werden  können. 

Der  GSX-Grafik-Treiber 
(ca.  DM  69,-)  ermöglicht  das 
Erstellen  einfacher  Grafiken 
(z.B.  Kreise,  Polygon  etc.); 
somit  kommen  auch  Joyce- 
Besitzer  in  den  Genuß  die¬ 
ser  Eigenschaften. 

Info:  Fachhandel  □ 


Joyce-Trainingsdisk 

Von  der  Fa.  Schneider  wird 
in  Kürze  eine  Trainingsdis¬ 
kette  zu  LocoScript  erschei¬ 
nen. 

Damit  werden  einige  Unzu¬ 
länglichkeiten  des  Joyce- 
Handbuchs  in  Form  von 
Software  ausgebügelt.  Der 
Umgang  mit  dem  komplexen 
Textsystem  wird  anschau¬ 
licher. 

Schneider  hält  den  Verkaufs¬ 
preis  bewußt  niedrig  -  das 
LocoScript-Trainingspaket 
soll  ca.  DM  30,-  kosten. 
Info:  Fachhandel  □ 


Arnor-Eproms 
auch  für  6128 

Die  bekannten  Arnor-Pro- 
gramme  Protext,  Utopia, 
Maxam  Assembler  etc. 
werden  inzwischen  auch  für 
den  CPC  6128  angeboten. 
Durch  die  beim  6128  aus¬ 
geführten  Steckleisten  war 
ein  Anschluß  bis  jetzt  nicht 
möglich;  dieses  Manko  wur¬ 
de  inzwischen  behoben.  Im 
übrigen  war  zu  erfahren,  daß 
der  Orthographie-Checker 
ProSpell  schon  bald  in  einer 
deutschen  Version  erhältlich 
sein  soll. 

Info:  Fa.  Probst 

4100  Duisburg  □ 


Joyce-Literatur 

In  Kürze  wird  unter  dem 
Arbeitstitel  "Praktische  Text¬ 
verarbeitung  mit  Joyce"  ein 
Buch  für  den  Joyce  erschei¬ 
nen.  Neben  einer  Einfüh¬ 
rung  in  den  Umgang  mit 
LocoScript  werden  vor  allem 
die  diversen  Möglichkeiten 


der  Textgestaltung  aufgezeigt, 
die  dieses  Textsystem  bietet 
und  die  im  Handbuch  nicht 
berücksichtigt  wurden.  Dem 
Buch  liegt  eine  Arbeitsdis¬ 
kette  bei,  auf  der  so  wichtige 
Vorlagen  für  Etikettendruck, 
Diskettenbeschriftung,  diver¬ 
se  Schriftarten,  Erstellen  von 
Serienbriefen  bzw.  Rund¬ 
schreiben,  Erstellen  mathe¬ 
matischer  Texte,  Rechnun¬ 
gen  schreiben  u.v.m.  enthal¬ 
ten  sind.  Der  Preis  wird  vor¬ 
aussichtlich  bei  ca.  DM  89,- 
liegen  (inkl.  Diskette). 

Info:  Fach-/Buchhandel 
oder  direkt  bei  DMV  □ 


3  ”-Zweitl  aufwerk 

Ein  Kawon  Zweitlaufwerk 
im  3”-Format  wird  jetzt  zu 
einem  Preis  von  DM  298,- 
angeboten.  Es  ist  100  %-ig 
kompatibel  zum  Schneider 
FD- 1  und  läßt  sich  problem- 
los  an  CPC  464/664/6128 
und  Vortex  Fl-S  und  Fl-D 
anschließen. 

Für  CPC  664  und  6 1 28  wird 
ein  zusätzliches  Anschluß¬ 
kabel  benötigt  (ca.  48  -  DM). 
Info:  GAI-Computer 
7107  Neckarsulm  □ 


Schneider 
senkt  Preise 

Ab  1 .7. 86  hat  Schneider  die 
Preise  für  den  CPC  6128 
sowie  für  die  Diskettenlauf¬ 
werke  gesenkt. 

Der  CPC  6128  grün  kostet 
dann  DM  999,-,  der  CPC 
6128  colorDM  1.699,-.  Der 
Preis  für  die  Laufwerke 
DDI-1  und  FD-1  wurde  auf 
DM  498,-  gesenkt. 

Info:  Fachhandel  □ 


Keine 

Sinclalr-Produkte 

Schneider  wird  entgegen 
ersten  Aussagen,  keine  Pro¬ 
dukte  unter  dem  Namen 
Sinclair  vertreiben.  Es  ist 
nicht  bekannt,  über  welchen 
Distributor  zu  welchem  Zeit- 
punkt  eventuell  neue  Sin¬ 
ei  air-Produkte  in  Deutsch¬ 
land  angeboten  werden. 
Gute  Nacht  Sinclair?!  □ 
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Basic-Kurs 


Weiter  geht  es  in  der  Entwicklung  unse-^ 
rer  Adressverwaltung.  Mit  der  diesmo- 
natigen  Fertigstellung  von  Modul  3  und 
Einbauen  des  Menuepunktes  ”AN- 
DERN”,  können  Sie  erstmals  richtig 
mit  dem  Programm  arbeiten. 

Zwar  fehlen  immer  noch  die  unbe¬ 
dingt  notwendigen  Speicheroperatio¬ 
nen,  aber  ein  grundsätzliches  Erfas¬ 
sen  und  Bearbeiten  von  Daten  ist  auf 
jeden  Fall  schon  einmal  möglich. 
Auf  Anfrage  zahlreicher  Leser  brin¬ 
gen  wir  im  Anschluß  an  diesen  Kurs 
noch  einmal  ein  zusammengefaßtes 


nen  auf  bereits  bestehende  Programm¬ 
zeilen  zurückgreifen  können. 
Zunächst  einmal  ein  Abriß,  was  die 
Routine  genau  machen  soll. 

Im  letzten  Kurs  hatten  wir  ja  damit 
aufgehört,  daß  am  Bildschirm  die  ge¬ 
fundene  Adresse  ausgegeben  wurde 
und  danach  eine  kleine  Menuezeile, 
von  der  aus  man  in  den  Änderungs¬ 
modus  springen  konnte.  Die  Durch¬ 
numerierung  bei  den  einzelnen 
Adressfeldern  wurde  bewußt  ausge¬ 
geben;  sie  wird  beim  Ändern  benö¬ 
tigt.  Die  Routine  (s.  Listing  1)  soll 
nämlich  nach  dem  Anspringen  ab- 
fragen,  welches  Feld  geändert  werden 
soll.  Dabei  soll  der  Bildschirm  nicht 
wie  beim  Beginn  anderer  Module  ge¬ 
löscht  werden,  sondern  die  Infor¬ 
mation,  welcher  Eintrag  in  welchem 


gung  auf  unsere  bereits  bekannte  Ein¬ 
gaberoutine,  in  der  zuerst  die  Position 
der  Eingabezeile,  die  Länge  und  eine 
Hilfspunktlinie  ausgegeben  wird. 
Danach  springt  das  Programm  in  die 
Subroutine  INPUT.  Bei  Rücksprung 
findet  die  Fehlerauswertung  statt  und 
der  Antwortstring  wird  direkt  in  den 
Array-Eintrag  mit  der  laufenden 
Adressnummer  und  der  angewählten 
Feldnummer  geschrieben.  Dieser 
Vorgang  fand  schon  mehrmals  in 
unserer  Adressverwaltung  Verwen¬ 
dung  und  bedarf  keiner  erneuten  Er¬ 
klärung.  Lediglich  der  Rücksprung 
aus  dieser  Routine  ist  neu,  er  ver¬ 
zweigt  nach  2400,  wo  die  gefundene 
Adresse  mit  den  geänderten  Daten 
neu  ausgegeben  und  erneut  die  Me¬ 
nuezeile  erzeugt  wird. 

Dies  war  auch  schon  alles,  was  es  zu 
dieser  Routine  zu  sagen  gibt.  Kürze 
bedeutet  hierbei  nicht,  daß  die 
Routine  unkomfortabel  ist,  sondern 
einfach  nur,  daß  man  in  Basic  bereits 
vorhandene  Routinen  zur  Program¬ 
miererleichterung  mehrmals  benut¬ 
zen  kann. 

Im  nächsten  Monat  geht  es  dann  an 
die  Programmierung  der  Routinen 
für  externe  Datenträger  und  einer  Er¬ 
klärung,  wie  es  überhaupt  möglich  ist; 


Listing  1 

2610  LOCATE  1,14:PRINT"  WELCHEN  EINTRAG  AE  [34461 
NDERN  1 1  ...  8  1 " 

2620  ABF$=INKEY$:IF  ABF$=H”  THEN  2620  [27221 

2630  IF  VAL{ ABF$ ) <1  OR  VAL(ABF$)>8  THEN  26  [35991 
20 

2640  XP=2: YP=1 6  [5931 

2650  ON  VAL ( ABF$ )  GOTO  2660,2660,2660,2690  [16991 
,2690,2660,2720,2750 

2660  ML= 10: LOCATE  XP,YP:PRINT  STRINGS (ML, "  £31821 
.”):GOSUB  1510 

2670  IF  ER=0  THEN  ADR $ (SCAN, VAL (ABF$ )) =AN$  [30481 
:GOTO  2400 

2680  IF  ER=1  THEN  GOTO  2660  [1831 


2690  ML=  4 : LOCATE  XP,YP:PRINT  STRINGS (ML," .  [2485  1 
"):GOSUB  1510 

2700  IF  ER=0  THEN  ADR $ (SCAN, VAL ( ABF$ )) =AN$  [3048] 
:GOTO  2400 

2710  IF  ER=1  THEN  GOTO  2690  [2651 

2720  ML= 15: LOCATE  XP,YP:PRINT  STRINGS (ML, "  [5067] 
. "  )  :GOSUB  1510 

2730  IF  ER=0  THEN  ADR $( SCAN, VAL (ABF$ ) ) =AN$  [30481 
:GOTO  2400 

2740  IF  ER=1  THEN  GOTO  2720  [267] 

2750  ML=20 : LOCATE  XP,YP:PRINT  STRING $ (ML, "  [19451 
." ):GOSUB  1510 

2760  IF  ER=0  THEN  ADR$ ( SCAN, VAL (ABF$ )) =AN$  (30481 
:GOTO  2400 

2770  IF  ER=1  THEN  GOTO  2750  [261  1 


Listing  aller  bisher  erarbeiteten  Mo¬ 
dule. 

Der  Zeitpunkt  dafür  bietet  sich  an,  da 
die  Routine  dieses  Monats  sehr  kom¬ 
pakt  gehalten  werden  kann  und  man 
nach  Abtippen  ein  schon  nahezu 
komplettes  Programm  zum  Arbeiten 
hat. 

Das  Programm  ist  deshalb  so  kurz  ge¬ 
halten,  da  wir  für  nahezu  alle  Routi- 


Feld  steht,  bestehen  bleiben.  Dies  ge¬ 
schieht  in  Zeile  2610.  Hier  wird 
danach  gefragt,  welches  Feld  (1-8) 
geändert  werden  soll. 

In  Zeile  2620  und  2630  wird  die  Ein¬ 
gabe  ausgewertet  und  gegen  Falsch¬ 
eingaben  gesperrt.  Diese  Routine  ist 
bekannt,  da  sie  in  den  vorherigen 
Kursen  schon  verwandt  wurde. 

Zeile  2640  und  2650  setzt  die  Verzwei- 


Daten  abzu legen. 

Zum  Abschluß  möchte  ich  noch  die 
Aufforderung  an  die  Leser  loswerden, 
das  Erlernte  nicht  einfach  so  hinzu¬ 
nehmen,  sondern  sich  aktiv  an  unse¬ 
rem  Kurs  zu  beteiligen  und  mir  Ver¬ 
besserungsvorschläge  und  eigene 
Routinen  zuzusenden. 

Viel  Spaß  beim  Ausprobieren! 

(TM) 


Listing  2 

10  REM  . .  [14151 

20  REM  •  CPC  BASICKURS  •  [16081 

30  REM  *  ADRESS -VERWALTUNG  •  [14301 

40  REM  •  MODUL  0  :  HAUPTMENUE  *  [12621 

50  REM  . . [14151 

60  REM  [2721 

70  MODE  1  (5061 

80  DIM  ADR$ ( 100,8)  [9351 

90  REM  (2721 

100  CLS  [91 1 


110  PRINT"  CPC  BASICKURS  ADRESSVERWALTU  [23381 
NG  " 


120 

PRINT" - 

[2703 1 

130 

PRINT: PRINT" 

HAUPTMENUE" 

[15991 

131 

PRINT : PRINT : PRINT 

(10821 

140 

PRINT: PRINT" 

[1  1 

ERFASSEN" 

[2336  1 

150 

PRINT: PRINT" 

[21 

SUCHEN/ AEN 

125481 

DERN" 

160 

PRINT: PRINT" 

[31 

DATEN  SICH 

(3218  ] 

ERN" 

170 

N" 

180 

PRINT: PRINT" 

[41 

DATEN  LADE 

[2577  1 

PRINT; PRINT" 

[51 

DRUCKEN" 

(1679  1 

190 

A$=INKEY$ : IF  A$="" 

THEN  GOTO  190 

[1850  1 
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200  IF  VAL ( A$ )  <1  OR  VAL(A$)>5  THEN  190 

(20841 

2060  LOCATE  2,10:PRINT" 

7)  TEL. NR.  [ 

[3223] 

210  IF  A$=" 1 "  THEN  GOSUB  1000 

[1409] 

8]  BEMERKUNG" 

220  IF  A$="2"  THEN  GOSUB  2000 

[988] 

2070  LOCATE  2,1 2: PRINT" 

[9]  HAUPTM 

[3222] 

230  IF  A$="3"  THEN  GOSUB  3000 

[1651  1 

ENUE" 

240  IF  AS="4"  THEN  GOSUB  4000 

[2000] 

2080  PRINT: PRINT" - 

[2629] 

250  IF  A$="5"  THEN  GOSUB  5000 

[1320] 

260  GOTO  100 

1417] 

2090  PRINT"BITTE  SUCHFELD  WAEHLEN  (1-9 

(26161 

270  REM  * . ••••••»••• 

11220] 

]" 

280  REM  *  ENDE  MODUL  0  • 

11133] 

2100  WAHL!* INKEYS :IF  WAHL!*""  THEN  2100 

(2212) 

290  REM  ••*•*•••»•*********** 

11220] 

2110  IF  VAL (WAHL! )  <1  THEN  GOTO  2100 

[2773) 

1000 

CLS 

[91  ] 

2120  IF  VAL (WAHL!)  >9  THEN  GOTO  2100 

(26721 

1010 

PRINT"  ADRESSEN  EINGEBEN  ADRES 

(36081 

2130  IF  VAL (WAHL! )  =  9  THEN  RETURN 

[3654  1 

SE  : " : LFD 

2140  FELDNR  =  VAL ( WAHL! ): GOSUB  2200:RETURN 

[1628] 

1020 

PRINT" - — 

[2703 1 

2150  GOTO  2100 

(359) 

II 

2200  XP=2 : YP=1 8 :ON  FELDNR  GOTO  2210,2210,2 

[36321 

1030 

LOCATE  2,4:PRINT"NAME 

[2028  J 

210,2240,2240,2210,2270 

2300 

1040 

LOCATE  2 , 6 : PR INT" VORN AME : " 

[19281 

2210  ML=10: LOCATE  XP,YP 

PRINT  STRING! (ML," 

(3182) 

1050 

LOCATE  2,8: PRINT"STRASSE : " 

[15691 

.  "  ) :  GOSUB  1510 

1060 

LOCATE  2,10: PR INT" HS NR .  : " 

[18051 

2220  IF  ER=0  THEN  SUCH S* AN! : GOTO  2330 

[1546] 

1070 

LOCATE  2,1  2: PRINT" PLZ. 

[2417] 

2230  IF  ER=1  THEN  GOTO  2210 

[233  ] 

1080 

LOCATE  2,14: PRINT"WOHNORT : " 

[2186] 

2240  ML=4: LOCATE  XP,YP:PRINT  STRING! (ML, " . 

[2485] 

1090 

LOCATE  2,16: PRINT"TEL-NR . : " 

[1861  ] 

"  ) :  GOSUB  1510 

1100 

LOCATE  2,18: PRINT"BEMERK . : " 

[1944  ] 

2250  IF  ER=0  THEN  SUCHS= 

=AN$:GOTO  2330 

[1546  ] 

1110 

PRINT: PRINT" - 

[2629  ] 

2260  IF  ER=1  THEN  GOTO  2240 

[219] 

- » 

2270  ML=1 5: LOCATE  XP,YP: PRINT  STRINGS (ML," 

[5067] 

1120 

XP=1 2 : YP=4 :ML=1 0 : LOCATE  XP,YP:PRINT 

S 

[3211  ] 

."):GOSUB  1510 

TRING$ ( ML ,  " .  "  ) 

2280  IF  ER=0  THEN  SUCH$=AN$ :GOTO  2330 

[1546] 

1130 

XP=1  2 : YP=6 :ML=1 0 ; LOCATE  XP , YP : PRINT 

S 

[3832] 

2290  IF  ER=1  THEN  GOTO  2290 

[217] 

TRING$  (ML  ,  "  .  ",) 

2300  ML* 20: LOCATE  XP,YP: PRINT  STRING! (ML," 

[1945] 

1140 

XP = 1  2  :  YP*  8  : ML* 1 0 : LOCATE  XP , YP : PRINT 

S 

[3836] 

.")  .-GOSUB  1510 

TRING$(ML  " 

2310  IF  ER=0  THEN  SUCHS= 

=ANS:GOTO  2330 

[1546] 

1150 

XP= 1 2 : YP= 1 0 : ML= 4 : LOCATE  XP , YP : PRINT 

S 

[4897] 

2320  IF  ER=1  THEN  GOTO  2300 

[223] 

TRING$(ML,"." ) 

2330  SUCHLANG=LEN( SUCH! ) 

[1233  J 

1160 

XP* 1 2 : YP* 1 2 : ML* 4 : LOCATE  XP , YP : PRINT 

S 

[47241 

2340  FOR  SCAN  *  0  TO  LFD 

[1167] 

TRING$ (ML, " . " ) 

2350  SCAN$=LEFTS ( ADR $( SCAN, FELDNR) ,SUCHLAN 

(4497 ] 

1170 

XP= 1 2 : YP= 1 4 : ML* 1 0 : LOCATE  XP , YP : PRINT 

[3633] 

G) 

STRING$ ( ML , " . "  ) 

2360  IF  UPPER 1 ( SUCH! )=UP PER! (SCAN!)  THEN  G 

[2436 ] 

1180 

XP=1 2 : YP=1 6 :ML=1 5 : LOCATE  XP , YP : PRINT 

13978  ] 

OTO  2400 

STRING! (ML. ".") 

2370  NEXT  SCAN 

[431  1 

1190 

XP=1 2 : YP=1 8 :ML=20 : LOCATE  XP , YP : PRINT 

[3615] 

2380  PRINT :PRINT"NICHT  GEFUNDEN  [TASTE]":C 

[3200] 

STRING! (ML,".") 

ALL  &BB06 :GOTO  2000 

1200 

FELD=1 : XP=1 2 : YP=4 :ML=1 0 : GOSUB  1510 

12049] 

2400  CLS 

191  1 

1210 

IF  ER=0  THEN  ADR! (LFD, FELD) =AN$ 

[909] 

2410  PRINT"GEFUNDEN  :  ADRESSE  NUMMER  ";SCA 

[2747] 

1220 

IF  ER=1  THEN  GOTO  1200 

(235  ] 

N: PRINT 

1230 

FELD* 2 :XP=1 2: YP=  6 : ML=1 0 : GOSUB  1510 

[21823 

2420  PRINT"  1  :  NAME 

" ; ADR! (SCAN,  1  ) 

[3181  ] 

1240 

IF  ER=0  THEN  ADR! (LFD, FELD-)  =AN$ 

1909] 

2430  PRINT"  2  :  VORNAME 

ADR! (SCAN, 2) 

[2337] 

1250 

IF  ER=1  THEN  GOTO  1230 

(237  ] 

2440  PRINT"  3  :  STRASSE 

"; ADR! (SCAN, 3) 

[2113) 

1260 

FELD=3: XP=1 2 : YP=8 :ML=1 0 : : GOSUB  1510 

(22451 

2450  PRINT"  4  :  HSNR. 

ADR! (SCAN, 4) 

[29491 

1270 

IF  ER=Q  THEN  ADR $ (LFD, FELD) = AN! 

(9091 

2460  PRINT"  5  :  PLZ. 

" ; ADR! (SCAN, 5 ) 

[22691 

1280 

IF  ER=1  THEN  GOTO  1260 

1223  ) 

2470  PRINT"  6  :  WOHNORT 

" ; ADR ! ( S  CAN , 6 ) 

[1709] 

1290 

FELD* 4 : XP=1 2 : YP=1 0 :ML=4 :GOSUB  1 51 0 

[2589] 

2480  PRINT"  7  :  TEL-NR. 

"; ADR! (SCAN, 7) 

[2511  ] 

1  300 

IF  ER=0  THEN  ADR! (LFD, FELD) *ANS 

[909] 

2490  PRINT"  8  :  BEMERK. 

ADR! (SCAN, 8) 

[1720] 

1  310 

IF  ER=1  THEN  GOTO  1290 

[225] 

2500  PRINT : PRINT" [W]  EITER  [A]  ENDERN 

12487) 

1  320 

FELD* 5 :XP=1 2 : YP=1 2 ;ML=4 ;GOSUB  1510 

[2196  1 

CM J  ENUE" 

1  330 

IF  ER=0  THEN  ADR! (LFD, FELD) =AN! 

[909] 

2510  ABFS = INKEYS :IF  ABF!*""  THEN  2510 

[27201 

1  340 

IF  ER*1  THEN  GOTO  1320 

[67] 

2520  IF  UPPERS ( ABFS )="W"  THEN  2370 

[12331 

1  350 

FELD* 6 : XP=1  2 : YP*1  4 : ML=1 0 : GOSUB  1510 

[18281 

2530  IF  UPPER! ( ABF! )*"A"  THEN  2600 

[1221  ) 

1360 

IF  ER=0  THEN  ADR! (LFD, FELD) =AN! 

[9091 

2540  IF  UPPERS ( ABFS )="M"  THEN  RETURN 

[1445] 

1370 

IF  ER=1  THEN  GOTO  1  350 

[77] 

2550  GOTO  2510 

(341  1 

1  380 

FELD* 7 :XP=1 2 : YP=1 6 :ML=1 5 : GOSUB  1510 

[1979] 

2600  REM  HIERHIN  KOMMT  MODUL  (AENDERN) 

(26861 

1390 

IF  ER=0  THEN  ADR! ( LFD, FELD )=AN! 

(9091 

2610  LOCATE  1,14:PRINT" 

WELCHEN  EINTRAG  AE 

(34461 

1400 

IF  ER=1  THEN  GOTO  1380 

[295] 

NDERN  [  1  .  .  .  8  ]  " 

1410 

FELD=8 :XP=1 2 : YP=1 8 :ML=20 :GOSUB  1510 

[1613] 

2620  ABF! = INKEY! :IF  ABF$=""  THEN  2620 

[2722] 

1420 

IF  ER*0  THEN  ADR $ ( LFD , FELD ) =AN! 

[909] 

2630  IF  VAL ( ABF! ) < 1  OR  VAL(ABF$)>8  THEN  26 

[3599] 

1430 

IF  ER  =  1  THEN  GOTO  1410 

(265  ] 

20 

1440 

LFD=LFD+1 

[665] 

2640  XP=2:YP=16 

(593) 

1450 

LOCATE  10 ,22:PRINT"WEITER  ERFASSEN 

[J 

(2249) 

2650  ON  VAL ( ABF$ )  GOTO  2660,2660,2660,2690 

[1699] 

/NI" 

,2690,2660,2720,2750 

1460 

A!= INKEY! : IF  A! =""  THEN  1460 

[1437  ] 

2660  ML* 10: LOCATE  XP,YP 

PRINT  STRINGS (ML," 

[3182] 

1470 

IF  UPPER! (A!)*"J"  THEN  1000 

(1094  1 

.  "  )  :GOSUB  1510 

1480 

IF  UPPER! ( A! ) ="N"  THEN  RETURN 

(1583  J 

2670  IF  ER=0  THEN  ADR! (SCAN, VAL ( ABF! )) *AN$ 

(3048  1 

1490 

GOTO  1460 

(391  ] 

:GOTO  2400 

1500 

*  SUBROUTINE  FUER  EINGABE  ERSTE  VERSI 

[3180] 

2680  IF  ER=1  THEN  GOTO  2660 

(1831 

ON 

2690  ML=4: LOCATE  XP,YP: PRINT  STRING! (ML, " . 

(2485  1 

1510 

LOCATE  XP , YP : LINE  INPUT""; AN! 

[2329  1 

"  ) :  GOSUB  1510 

1520 

ER*Q :IF  LEN  (AN!)  >  ML  THEN  LOCATE 

XP 

13318] 

2700  IF  ER=0  THEN  ADR! (SCAN, VAL ( ABFS )) =AN$ 

(30481 

,YP: 

PRINT  STRING! ( ML ,"."): ER  =  1  :  RETURN 

:GOTO  2400 

1530 

RETURN 

[5551 

2710  IF  ER=1  THEN  GOTO  2690 

(2651 

2000 

CLS 

[91  ] 

2720  ML=1 5: LOCATE  XP,YP 

PRINT  STRINGS (ML," 

(50671 

2010 

PRINT"  ADRESSEN  SUCHEN  /  AENDERN" 

13154] 

." ):GOSUB  1510 

2020 

PRINT" - 

[2703] 

2730  IF  ER=0  THEN  ADR$ (SCAN, VAL ( ABFS )) *ANS 

[30481 

: GOTO  2400 

2030 

LOCATE  2,4: PRINT" [ 1 )  NAME 

12 

[2547] 

2740  IF  ER=1  THEN  GOTO  2720 

[267] 

)  VORNAME" 

2750  ML=20: LOCATE  XP,YP 

PRINT  STRING! (ML," 

[1945] 

2040 

LOCATE  2, 6: PRINT" (3)  STRASSE 

[4 

[2058  ] 

. " ) : GOSUB  1510 

)  HAUSNUMMER" 

2760  IF  ER=0  THEN  ADR! (SCAN, VAL ( ABFS )) »ANS 

13048 ] 

2050 

LOCATE  2, 8: PRINT" [5]  PLZ 

(6 

[30221 

:GOTO  2400 

]  WOHNORT" 

2770  IF  ER=1  THEN  GOTO  2750 

(261  ) 

14  CPC  7  ’86 


SFA 


maxeil  Disketten, 

damit  Computer  keine  Fehler  machen. 


maxell 

_ Disketten 

die  Zuverlässigen 


maxell 

COMPACT  FLOPPY  DISK 
COMRACT-DISKETTE 
DISQUETTE  COMPACTE 


f 

PLZ  1  -  5,  Komp, 

PLZ  7-8,  Synelec  GmbH, 

Nur  für  Hifi-Fachhandel 

* 

Heinrich-Späth-Str.  12-14, 

Postfach  151727, 

Harman  Deutschland  GmbH, 

4019  Monheim, 

8000  München  2, 

Hünderstr.  1,  7100  Heilbronn 

k _ 

Tel.  02173/3961-0 

Tel.  089/5179-0 

Tel.  071 31/480-0 

J 

Maxell  Europe  GmbH  ■  Emanuel-Leutze-Str.  1  •  4000  Düsseldorf  11  •  Telefon  02 11  /  59  51  -0 


Bericht 


Mi 


Morejoy  with  your  Stick 


Das  meistverbreitete  externe  Daten¬ 
eingabegerät  für  Heimcomputer  ist 
wohl  mit  absoluter  Sicherheit  der  Joy¬ 
stick.  Dafür  gibt  es  mehrere  Gründe. 
Zum  einen  werden  Heimcomputer  allen 
anderslautenden  Meinungen  zum  Trotz 
nach  wie  vor  sehr  oft  zum  Spielen  be¬ 
nutzt.  Zum  anderen  ist  dieser  Schlüssel 
zur  Welt  der  Computerunterhaltung 
nicht  gerade  teuer. 

Als  es  mit  den  Computerspielen 
richtig  losging,  gab  es  nur  simple 
Membran-Joysticks.  Diese  Dinger 
waren  dann  zumeist  auch  noch 
schlecht  verarbeitet  und  brachten, 
trotz  drastischer  Bemühungen  seitens 
der  Anwender  weniger  hohe  Scores 
als  schmerzende  Handgelenke.  Dies 
waren  kleine,  viereckige  Kästchen 
aus  Plastik,  mit  einem  10  cm  langen, 
schwarzen  Kunststoffstab,  der  aus¬ 
sah,  wie  ein  zu  klein  geratener  Fahr¬ 
radgriff. 

Aber  je  mehr  Spiele  auf  den  Markt 
kamen  und  je  besser  sie  wurden, 


desto  höher  wurden  auch  die  Ansprü¬ 
che,  die  an  die  Geschicklichkeit  des 
Spielers  gestellt  werden  mußten.  Ohne 
ein  geeignetes  Werkzeug  war  es  manch¬ 
mal  gar  nicht  mehr  möglich,  sich  in 
den  teilweise  rasend  schnellen  Spielab¬ 
läufen  zu  behaupten.  Natürlich  hatte 
dies  auch  Auswirkungen  auf  die  Joy¬ 
sticks.  Und  sollte  es  so  etwas  wie  einen 
Hochleistungstelespieler  geben,  wür¬ 
de  dieser  sicherlich  über  ein  ganzes 
Sammelsurium  von  Joysticks  verfü¬ 
gen.  Gewiß  würde  man  in  diesem  Ar¬ 
senal  auch  Paddies  und  einen  Track¬ 
ball  finden.  Aber  keines  dieser  beiden 
würde  so  oft  benötigt  wie  der  Joy¬ 
stick. 

Nachdem  klar  geworden  war,  daß  mit 
den  einfachen  Membran-Joysticks 
nicht  besonders  präzise  gespielt  wer¬ 
den  konnte,  verfiel  man  darauf,  auch 
Joysticks  mit  Mikroschaltern  herzu¬ 
stellen.  Beide  Typen  gibt  es  inzwi¬ 
schen  in  einem  recht  stattlichen  Sorti¬ 
ment,  das  von  Sticks  mit  übergroßen 
Feuertasten  bis  zu  Geräten  mit  aus¬ 


wechselbaren  Griffen  reicht. 

Eine  dritte  Ausführung  des  Joysticks, 
die  allerdings  den  Stick  abgespeckt 
hat,  ist  ebenfalls  seit  einiger  Zeit  auf 
dem  Markt  erhältlich.  Diese  Joy-  oder 
Turbocard  besteht  nur  noch  aus 
einem  ca.  2  cm  dicken  Plastikkäst¬ 
chen,  auf  dessen  5x12  cm  großen 
Oberfläche  sich  ein  achteckiger,  flacher 
Steuerknopf  und  zwei  kleinere  Feuer- 
knöpfe  befinden.  Diese  Joycards  eig¬ 
nen  sich  hervorragend  für  Spiele,  bei 
denen  es  um  präzises  Diagonalsteuem 
geht.  Alle  Q-Bert-Varianten  lassen  sich 
mit  der  Joycard  bestens  steuern.  Auch 
bei  einigen  Sportspielen,  bei  denen  es 
um  schnelles  Wechseln  von  rechts/ 
lin  ks  oder  oben/unten  geht,  beispiels¬ 
weise  Decathlon,  lassen  sich  mit  der 
Joycard  ausgezeichnete  Ergebnisse 
erzielen.  Sollte  ein  sehr  schnelles 
Feuern  beim  Meistern  eines  Spieles 
vonnöten  sein,  kann  man  notfalls 
auch  auf  die  Joycard  zurückgreifen. 
Allerdings  wird  sehr  schnelles  Feuern 
meistens  bei  Spielen  ä  la  Defender 
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verlangt  Wer  kennt  die  schnellen  Bal¬ 
lerspiele  nicht,  mit  schnellem  und 
präzisem  Beschleunigen,  Lenken  und 
Abbremsen.  Hier  versagt  die  Joycard 
meistens,  oder  verschafft  zumindest 
Krämpfe  in  den  Fingern.  Mit  einem 
guten  Mikroschalter-Joystick,  der  ei¬ 
nen  leichtgängigen  Feuerknopf  hat, 
ist  man  hier  um  einiges  besser  bera¬ 
ten. 

Um  Ihnen  nun  einen  kleinen  Über¬ 
blick  über  Eigenschaften  und  Beson¬ 
derheiten  einiger  Joysticks  zu  ver¬ 
schaffen,  haben  wir  einige  für  Sie  ge¬ 
testet. 


Slik  Stik 


Der  ”Slik  Stik”  von  Suncom  trägt  sei¬ 
nen  Namen  nicht  zu  Unrecht.  In  ge¬ 
wisser  Weise  fühlt  sich  das  Steuern 
mit  diesem  Stick  sehr  soft  an.  Dies  be¬ 
ruht  zweifelsohne  auf  der  sehr  stabi¬ 


len  kunststoffüberzogenen  Metallme¬ 
chanik,  die  in  einem  kleinen,  recht¬ 
eckigen  Plastikkästchen  mit  abgerun¬ 
deten  Kanten  sitzt  Die  Abfrage  erfolgt 
über  Platinmembranen,  die  allerdings 
durch  die  Mechanik  einiges  von  ihrer 
Ungenauigkeit  verloren  haben. 

Der  Feuerknopf  muß  mit  dem  linken 
Daumen  bedient  werden;  außerdem 
ist  er  recht  schwergängig.  Für  Spiele 
mit  ”Commando"-Charakter  bedeu¬ 
tet  dies  mit  absoluter  Sicherheit 
dicke  Daumen. 


Moonraker  I  +  II 


Der  "Moonraker”  ist  ein  Membra- 
nenstick,  der  auf  den  ersten  Blick 
durch  seine  Form  auffällt.  Auf  einem 
großen,  runden  Basiskörper,  dessen 
Unterseite  mit  Saugnäpfen  ausgestat¬ 
tet  ist,  sitzt  ein  Griff,  der  wie  ein 
Flugzeugsteuerknüppel  anmutet. 
Zwei  Feuerknöpfe,  für  Daumen  und 


Zeigefinger,  sind  sozusagen  "links- 
händerfreundlich”  vorne  und  hinten 
am  oberen  Ende  des  Griffes  ange¬ 
bracht. 

Für  den  Transport  läßt  sich  "Moon¬ 
raker”  auf  weniger  sperrige  Dimen¬ 
sionen  umbauen.  Mit  einem  Hand¬ 
griff  läßt  sich  der  Griff  aus  der  Joy¬ 
stickbasis  herausziehen.  Wegen  seiner 
Saugnäpfe  und  der  großen  Grundflä¬ 
che  erzielt  der  Joystick  auch  bei 
heißesten  Schlachten  eine  große  Stand¬ 
freudigkeit  auf  dem  Untergrund. 

Der  "Moonraker  11"  ist  speziell  für 
den  Schneider  konzipiert  und  hat  an 
der  Basis  eine  Joystickbuchse  für  den 
Anschluß  eines  zweiten  Joysticks. 


Speedking 


Das  erste,  auf  das  man  beim  "Speed- 
king”  aufmerksam  wird,  ist  die  Form, 
die  ein  optimales  "In-der-Hand-liegen” 
garantieren  soll.  Der  Basiskörper  ist 
in  etwa  wie  eine  geballte  Faust  ge¬ 
formt  und  liegt  dementsprechend  satt 
in  der  Hand.  Sein  Feuerknopf  ist  so 
angebracht,  daß  man  ihn  bequem  mit 
dem  Mittel-  oder  Zeigefinger  errei¬ 
chen  kann.  Allerdings  macht  dies  die 
Benutzung  für  einen  reinen  Links¬ 
händer  unmöglich.  Der  Stick  ist  nur 
ca.  5  cm  groß  und  offensichtlich 
Mikroschalter-abgefragt. 


Die  leichtgängige  Feuertaste  und  die 
kurzen  Joystickwege,  zu  denen  sich 
die  Präzision  der  Mikroschalter  ge¬ 
sellt,  machen  aus  dem  ”Speedking” 
einen  sehr  guten  und  genauen  Joy¬ 
stick. 


Competition  Pro 


Der  seit  einiger  Zeit  auf  dem  Markt 
erhältliche  "Competition  Pro”  fällt 
durch  sein  schlichtes,  allerdings 
wohldurchdachtes  Design  auf.  Zwar 
kann  man  keinesfalls  behaupten,  daß 
sein  Gehäuse  ergometrisch  geformt 
sei,  allerdings  macht  das  die  Prä¬ 
zision  und  die  Leichtgängigkeit  des 
großen  Steuerknüppels  wieder  wett. 
Die  beiden  Feuertasten,  die  sich  links 
und  rechts  am  vorderen  Ende  des 
rechteckigen  Plastikgehäuses  befin¬ 
den,  sind  weich  gelagert  und  reagie¬ 
ren  prompt.  Auch  längeres,  drasti¬ 


sches  Inanspruchnehmen  läßt  den 
”Competition  Pro”  kalt.  Nur  bei  eini¬ 
gen  Spielen,  die  exaktes  Diagonal¬ 
steuern  erfordern,  konnte  der  ”Com- 
petition  Pro”  nicht  100  %-ig  überzeu¬ 
gen.  Aber  ansonsten  ist  er  eine  gute 
und  dauerhafte  Investition. 


Tac-2 


Auf  den  ersten  Blick  sieht  der  "Tac-2” 
wie  der  große  Bruder  des  "Slik  Stiks” 
und  der  kleine  Bruder  des  "Compe¬ 
tition  Pro”  aus.  Vom  Slik  Stik  hat  er 
seine  Form  und  seine  Mechanik,  vom 
Competition  Pro  die  beiden  Feuerta¬ 
sten,  die  hier  an  derselben  Stelle 
sitzen. 

Der  Stick  ist  gut  gelagert.  Beim  ge¬ 
radlinigen  wie  auch  beim  Diagonal¬ 
lenken  lassen  sich  gute  Ergebnisse  er¬ 
zielen.  Die  Feuertasten  haben  so 
etwas  wie  einen  Druckpunkt  und 
funktionieren  nicht  besonders  leicht. 
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In  seinem  schwarz-silbernen  Gewand 
sieht  der  "Tac-2”  nicht  nur  gut  aus,  er 
funktioniert  auch  so. 


Tac-3 


Der  Nachfolger  des  "Tac-2"  hat  nichts 
mehr  mit  seinem  Vorgängermodell 
gemein.  Aus  dem  schwarzen  Ge¬ 
häuse  wurde  ein  cremefarbenes,  das 
nun  drei  Feuerknöpfe  hat,  zwei  an 
den  bekannten  Stellen  des  Joystick¬ 
gehäuses  und  einen  auf  der  Spitze  des 
Griffes. 

Die  Mechanik  läßt  sehr  zu  wünschen 
übrig. 


The  Arcade 


Ebenfalls  ein  Joystick,  der  durch  sein 
Aussehen  auffällt.  Annähernd  ergo- 
metrisch  geformt,  vermittelt  der  ”Ar- 
cade"  Joystick  auf  den  ersten  Blick 
den  Eindruck  eines  stabilen  und  prä¬ 
zisen  Werkzeuges.  Und  er  hält  auch, 
was  er  verspricht.  Mit  Microschaltern 
versehen,  deren  Wirkung  noch  durch 
eine  stabile  Konstruktion  unterstri¬ 
chen  wird,  eignet  sich  der  "Arcade” 
ausgezeichnet  für  schnelle  Spiele,  bei 
denen  es  außerdem  auf  schnelles 
Feuern  ankommt. 

Der  Feuerknopf  ist  an  der  dreieckig 
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auslaufenden  Spitze  angebracht  und 
gut  zu  erreichen.  Durch  seine  leichte 
Gängigkeit  ermüdet  der  Daumen 
nicht  so  schnell. 

Der  Arcade  ist  auch  für  Linkshänder 
zu  empfehlen. 


Turbocard  /  Joycard 


Wie  bereits  in  der  Einleitung  er¬ 
wähnt,  besticht  die  "Joycard"  durch 
das  kompakte  Konzept,  das  ihr  zu¬ 
grunde  liegt. 

Ein  einfacher,  achteckiger  Steuer¬ 


knopf  und  zwei  nebeneinander  bzw. 
untereinander  angebrachte  Feuerta¬ 
sten  machen  die  ganze  Card  aus.  Sie 
eignet  sich  hervorragend  für  alle 
Spiele,  die  exaktes  diagonales  Steu¬ 
ern  verlangen.  Auch  bei  einigen 
Sportsimulationen  lassen  sich  mit 
der  "Joycard"  beste  Ergebnisse  er¬ 
zielen. 


Quickshot  I 


Ein  echter  Oldtimer  ist  er  schon,  der 
"Quickshot  I".  Einer  der  ersten  Mem¬ 
branen- Joysticks.  Trotz  der  Membra¬ 
nen  lassen  sich  mit  dem  Quickshot 
rundherum  gute  Scores  erzielen.  Ob¬ 


wohl  nur  aus  Plastik  gefertigt,  ist  auch 
präzises  Lenken  möglich.  Zwei  Feuer¬ 
knöpfe,  einer  an  der  Vorderseite  des 
Basiskörpers,  der  andere  auf  der  Spitze 
des  Sticks,  unterstützen  schnelles  und 
feuerintensives  Spielen. 

Größter  Nachteil  des  "Quick  Shot  I”: 
Solange  er  funktioniert,  macht  er  seine 
Sache  ausgezeichnet,  allerdings  wenn 
er  kaputt  geht,  dann  meistens  end¬ 
gültig. 


Quickshot  II 

Das  Nachfolgemodell  des  "Quick¬ 
shot  1”  unterscheidet  sich  durch  ein 
neues  Design  und  eine  neue  Plazie¬ 
rung  der  Feuerknöpfe,  die  sich  hier 
beide  an  der  Spitze  des  Sticks  befin¬ 
den.  Abgesehen  davon  fällt  die  Dauer¬ 
feuer-Option  auf,  die  sich  durch  einen 
Schalter  aktivieren  läßt. 
Bedauerlicherweise  funktioniert  diese 
aber  nicht  auf  dem  Schneider- 
Rechner. 

Wie  auch  schon  beim  "Quickshot  I", 
sind  auch  hier  Saugnäpfe  am  unteren 
Ende  angebracht.  Dies  ermöglicht 
einhändiges  Spielen.  Man  kann  sich 
also  auch  in  der  heißesten  Schlacht 
den  Schweiß  von  der  Stirne  wischen. 


Abgesehen  von  den  erwähnten  Ein¬ 
zelheiten  unterscheidet  sich  das  Ii-er 
Modell  nicht  vom  "Quickshot  I”. 


Quickshot  IV 


Grundsätzlich  derselbe  Joystick  wie 
auch  der  Quickshot  I”.  Allerdings  mit 
dem  Unterschied,  daß  es  hier  drei 
auswechselbare  Griffe  gibt.  Je  nach 
Spiel  kann  man  sich  also  den  gewün¬ 
schten  Griff  montieren.  Die  Extra¬ 
griffe  sind  aus  Hartgummi  und  lie¬ 
gen  gut  in  der  Hand. 

Auch  hier  gibt  es  die  beiden  Feuer- 
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einer  auf  dem  Basiskörper  befinden. 
Der  Feuerknopf  auf  der  Basis  ist  eher 
eine  Feuertaste,  so  groß  ist  er  geraten. 
Aber  beim  hektischen  Spielen  biswei¬ 
len  von  Vorteil,  denn  diese  Taste 
kann  man  beim  besten  Willen  nicht 
übersehen  oder  daran  vorbeitippen. 

Durch  die  sechs  Saugnäpfe  und  die 
verhältnismäßig  sehr  große  Basisflä¬ 
che  wird  der  ”Quickshot  V”  extrem 
standfest  Man  hat  manchmal  Ärger, 
ihn  wieder  vom  Untergrund  herunter 
zu  bekommen. 


knöpfe  auf  der  Basis  und  dem  Griff. 
Ebenfalls  vom  ”Quickshot  I”  über¬ 
nommen  wurden  die  Saugnäpfe.  An¬ 
sonsten  gilt  dasselbe  wie  für  "Quick- 
shot  I  4-  II” 


Quickshot  V 


Optisch  einer  der  ausgefallensten 
Joysticks,  die  zum  Test  Vorlagen.  Auf¬ 
fallend  sind  die  drei  Feuerknöpfe, 
von  denen  sich  zwei  am  Stick  und 


Quickshot  IX 


Statt  eines  Sticks  wird  hier  mit  einer 
halbierten  Kugel  gesteuert. 

Von  Form,  Handhabung  und  Verar¬ 
beitung  sicherlich  das  Flaggschiff  im 
Quickshot-Sortiment.  Allerdings  für 
CPC-User  nicht  ohne  weiteres  an¬ 
wendbar.  Um  mit  dem  IX-er  Modell 
am  Schneider  arbeiten  zu  können, 
muß  erst  ein  Umbau  am  Joystick  vor¬ 
genommen  werden. 


GAME  OVER  Joystick  kaputt  -  was  nun? 


Wer  kennt  das  nicht!  Mitten  in  der 
heißesten  Schlacht  gibt  der  Joystick 
seinen  Geist  auf.  Zu  solchen  Gelegen¬ 
heiten  legen  defekte  Sticks  die  tollsten 
Macken  an  den  Tag.  Mal  lassen  sie  sich 
nicht  mehr  nach  links  lenken,  oder  die 
Feuertaste  macht  trotz  heftigster  Be¬ 
mühungen  keinen  Mucks  mehr.  In  sol¬ 
chen  Fällen  nicht  gleich  die  Flinte  ins 
Korn  zu  werfen,  erspart  ab  und  an  den 
Erwerb  eines  neuen  Joysticks. 

Sie  sollten  sich  den  defekten  Stick 
einmal  genauer  ansehen;  mit  ein 
wenig  Geschick  kann  man  leichtere 
Defekte  am  Joystick  mit  geringen 
Mitteln  selbst  reparieren. 

Bei  Membranenjoysticks  ist  einer  der 
häufigsten  Defekte  das  Versagen  der 
Kontakte.  Diese  Kontakte  befinden 
sich  auf  der  Platine  des  Sticks.  Es  sind 
vier  kreuzförmig  zueinander  an¬ 
geordnete  Metallfolien.  Sie  werden 
durch  das  Bewegen  des  Joysticks 
nach  einer  Seite  von  dem  am  unteren 
Ende  des  Steuerknüppels  sitzenden 
Plastikring  niedergedrückt.  Dadurch 
wird  der  Kontakt  geschlossen  und 
dem  Computer  die  Bewegung  in  die 
angesprochene  Richtung  gemeldet. 
Wenn  Sie  nun  die  Kontakte  durch 
starkes  Klebeband  erhöhen,  werden 


die  Auswirkungen  von  Abnutzung 
und  Materialermüdung  kompensiert, 
und  meistens  funktioniert  der  Joy¬ 
stick  nach  dieser  Prozedur  besser  als 
vor  dem  Defekt 

Die  Probleme,  die  sich  den  Benut¬ 
zern  von  Joysticks  mit  Mikroschaltem 
eröffnen,  sind  zumeist  der  gleichen 
Natur  wie  die  der  vorgenannten 
Membranenjoysticks.  Allerdings  reicht 
es  hier  meistens,  die  Mikroschalter  zu 
überprüfen  und  gegebenenfalls  mit 
dem  Schraubenzieher  neu  festzu¬ 
ziehen. 

Zumeist  befindet  sich  ein  schmaler 
Metallstreifen  vor  dem  eigentlichen 
Schalter.  Dieser  soll  die  Angriffsflä¬ 
che  des  an  sich  recht  kleinen  Schal¬ 
ters  erhöhen.  Tut  es  Ihr  Stick  nicht 
mehr,  und  beim  Schütteln  erklingt 
ein  leises  Rasseln  aus  dem  Stick,  so 
bedeutet  das  meistens,  daß  sich  eines 
dieser  Metallplättchen  selbständig 
gemacht  hat  und  nun  im  Gehäuse 
herumfällt.  Auch  in  einem  solchen 
Fall  kann  Abhilfe  geschaffen  werden. 
Drehen  Sie  die  Schraube,  die  das  Ge¬ 
häuse  des  Mikroschalters  zusam¬ 
menhält,  zwei  oder  drei  Windungen 
weit  heraus.  Nun  setzen  Sie  den  klei¬ 
nen  Metallbügel  wieder  in  die  dafür 
vorgesehene  Öffnung  und  ziehen  die 


Schraube  des  Gehäuses  wieder  fest. 
Bei  beiden  Joystick-Typen  -  Mem¬ 
branen  wie  Microschalter  -  kommt  es 
mitunter  zu  einfachen  Kabelbrü¬ 
chen;  oder  Lötpunkte,  die  durch  in¬ 
dustrielle  Fertigung  nur  mangelhaft 
bearbeitet  wurden,  lösen  sich.  Auch 
in  einem  solchen  Fall  lohnt  es  sich, 
den  Stick  zu  öffnen  und  zu  untersu¬ 
chen.  Da  solche  Defekte  meistens  ein¬ 
zeln  auftreten,  läßt  sich  leicht  feststel¬ 
len,  welches  Kabel  sich  von  welchem 
Lötpunkt  gelöst  hat.  Mit  einem  Löt¬ 
kolben  und  ein  wenig  Lötzinn  kann 
dann  dieser  Defekt  leicht  behoben 
werden.  Sollten  Sie  keinen  Lötkolben 
besitzen,  versuchen  Sie  es  doch  ein¬ 
fach  in  Ihrem  Bekanntenkreis.  Sie  wer¬ 
den  sehen,  es  gibt  mehr  Leute  die  sich 
mit  Elektronikbasteleien  beschäftigen 
als  Sie  denken.  Vielleicht  finden  Sie 
ja,  angeregt  durch  diese  Arbeiten,  rich¬ 
tig  Gefallen  an  einem  derartigen  Zeit¬ 
vertreib,  und  aus  Ihnen  wird  noch  ein 
gestandener  Lötkolbenprofi.  Aller¬ 
dings  ist  selbst  bei  solchen  einfachen 
Arbeiten  ein  umsichtiges  Vorgehen 
notwendig. 

Mit  diesen  kleinen  Tricks  kann  man 
sich  selbst  als  technisch  weniger  Be¬ 
gabter  manchesmal  das  Geld  für 
einen  neuen  Stick  sparen.  (HS) 
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Nicht  nur  dem  Namen 
nach  lehnt  sich  das 
Swords  &  Sorcery  Spiel 
von  PSS  an  die  bekann¬ 
te  Rollenspielserie  an. 
Der  Programmierer  hat 
das  umfangreiche  Regle¬ 
ment  der  von  Gary 
Gygax  entwickelten 
Rollenspiele  zur  Grund¬ 
lage  seines  Spieles  ge¬ 
macht.  Sowohl  vom 
Spielablauf  wie  auch  in 
Bezug  auf  Grafik  ver¬ 
steht  er  es,  zu  überzeu¬ 
gen.  Ein  neuartiges 
Steuerungssystem  auf 
Menue-Basis,  das  soge¬ 
nannte  Midas  System, 
trägt  einiges  zum  gelun¬ 
genen  Konzept  bei. 


Swords  & 
Sorcery 

Seitdem  es  die  ersten  Computerspiele 
überhaupt  gibt,  haben  die  Menschen, 
die  sich  mit  der  Erstellung  solcher 
Programme  befassen,  immer  neue 
Ideen  und  Programme  in  ihre  Werke 
einfließen  lassen.  Auf  diese  Art  und 
Weise  entwickelte  sich  das  Medium 
Computerspiel  immer  weiter. 
Unterstützt  durch  eine  immer  lei¬ 
stungsfähigere  Hardware  wichen  die 
Grenzen,  die  den  Programmierern  und 
ihren  Vorstellungen  gesetzt  waren, 
immer  weiter  zurück.  War  man  in  den 
Anfängen  schon  mit  der  Programmie¬ 
rung  einer  primitiven  Ping-Pong- Simu¬ 
lation  vor  schier  unlösbare  Probleme 
gestellt,  ist  man  heute,  durch  immer  lei¬ 
stungsfähigere  Chips  und  Prozessoren 
in  der  Lage,  selbst  von  so  komplizierten 
Vorgängen  wie  einer  Fluglotsentätig¬ 
keit,  respektable  Simulationen  zu  er¬ 
stellen. 

Mit  immer  gewiefteren  Methoden 
entlockte  man  Prozessoren  wie  dem 
Z-80,  eben  jenem  Chip,  der  auch  das 
Herzstück  der  CPC’s  darstellt,  Dinge, 
die  sich  die  Ingenieure,  die  diesen 
Prozessor  entwickelten,  niemals  hät¬ 
ten  träumen  lassen.  Mit  der  Zeit 
stellte  sich  heraus,  daß  die  groben 
Grenzen,  die  den  Programmierern 
und  ihrer  Imagination  gezogen  wa¬ 
ren  im  Reichtum  ihrer  Ideen  bestan¬ 
den. 


Spielideen,  aber  woher? 


Aus  dieser  Tatsache  heraus  resultiert 
die  permanente  Wechselbeziehung 
zwischen  Computerspielen,  Kinofil¬ 


men  und  Fernsehen.  Aber  nicht  nur 
aus  diesen  Bereichen  mußten  The¬ 
men  und  Themenkreise  zur  Entwick¬ 
lung  neuer  Spielideen  herhalten. 
Auch  in  der  Literatur  suchten  sich  die 
Programmierer  und  Ideenabteilun¬ 
gen  der  großen  Software-Häuser  ihre 
Anregungen  für  neue  Produkte.  Al¬ 
lerdings  werden  Bücher  meistens  stil¬ 
gerecht  als  Textadventures  oder  als 
graphikunterstützte  Adventures  um¬ 
gesetzt.  Seit  einiger  Zeit  hat  sich  eine 
neue  Ideenquelle  herauskristallisiert. 
Rollenspiele  aller  Themenkreise 
erfreuen  sich  einer  wachsenden  Be¬ 
liebtheit.  Diese  Art  Spiele  kann 
grundsätzlich  ohne  Computer  ge¬ 
spielt  werden.  So  hatte  auch  Gary 
Gygax,  der  Erfinder  dieser  Spiele,  in 
den  Anfangstagen  der  Rollenspiele 
mit  Computern  so  gut  wie  gar  nichts 
im  Sinn. 

Eine  Spielrunde,  die  ein  Rollenspiel 
ohne  Computer  vollzieht,  besteht  aus 
einer  variierenden  Anzahl  yon  Spie¬ 
lern  und  einem  Spielleiter.  Wie  der 
Name  "Rollenspiel”  schon  sagt,  be¬ 
steht  die  Aufgabe  der  Spieler  darin, 
sich  mit  einem  Charakter,  dem  jeder 
Spieler  am  Spielbeginn  durch  Wür¬ 
feln  gewisse  Charakteristiken  zuweist, 
zu  identifizieren.  Der  Spielleiter 
repräsentiert  sozusagen  das  Schick¬ 
sal,  denn  er  ist  der  einzige,  der  über 
alle  Sachverhalte,  die  den  Spielern  im 
Laufe  der  Partie  begegnen  können, 
Bescheid  weiß. 


Was  sind  Rollenspiele? 


Zumeist  beginnt  das  Spiel  damit,  daß 
der  Spielleiter  den  Spielern  eine 
möglichst  farbige  Erzählung  der  Vor¬ 
geschichte  präsentiert.  Damit  wird 
bezweckt,  in  der  Spielrunde  eine  ge¬ 
wisse  Atmosphäre  zu  erzeugen.  Im 
Anschluß  an  diese  Erzählung  be¬ 


ginnt  das  eigentliche  Spiel,  das  im 
großen  und  ganzen  in  der  Phantasie 
der  Spieler  stattfindet.  Eine  mögliche 
Spielszene  könnte  so  aussehen:  Krax, 
der  Zwerg  (dargestellt  von  Spieler  1) 
und  Cronax,  der  Krieger  (Spieler  2) 
befinden  sich  am  Anfang  eines  lan¬ 
gen  Tunnels,  der  sich  mit  der  Zeit  im 
Dunkel  verliert.  Diesen  Sachverhalt 
erhalten  die  Spieler  durch  die  Erzäh¬ 
lung  des  Spielleiters.  Setzen  wir 
voraus,  daß  Krax  als  erster  am  Zug  ist. 
Also  sagt  der  Spieler  -  der  Krax  dar¬ 
stellt  -  nun  dem  Spielleiter,  was  er  sei¬ 
nen  Charakter  tun  zu  lassen  gedenkt. 
Etwa:  Da  der  Tunnel  sehr  dunkel  ist, 
taste  ich  mich  langsam  voran.  Die  Er¬ 
widerung  des  Spielleiters:  Der  Tun¬ 
nelboden  ist  sehr  glatt,  und  so  vor¬ 
sichtig  du  dich  auch  bewegst,  besteht 
immer  noch  die  Möglichkeit,  daß  du 
ausrutschst  und  dich  dabei  verletzt. 
Ich  möchte  von  dir  eine  Geschick¬ 
lichkeitsprobe. 

Das  ist  der  Punkt,  an  dem  die  Würfel¬ 
regeln  zum  Tragen  kommen.  Je  nach¬ 
dem,  auf  welchem  Grundspiel  (Dun¬ 
geons  &  Dragons;  Tunnels  &  Trolls 
etc.)  sich  die  Spielrunde  aufbaut,  va¬ 
riieren  diese  Regeln.  Aber  prinzipiell 
sehen  diese  Regeln  folgendermaßen 
aus:  Die  Eigenschaft  des  Charakters, 
die  beim  Durchqueren  des  Tunnels 
gefordert  wird,  ist  die  Geschicklich¬ 
keit.  Wie  bereits  erwähnt,  wurden  zu 
Beginn  des  Spiels  für  jeden  Spieler 
Charaktereigenschaften  erwürfelt,  so 
auch  ein  Wert  für  die  Geschicklich¬ 
keit.  Beträgt  dieser  Wert  bei¬ 
spielsweise  10,  kann  der  Spielleiter,  je 
nach  der  Schwierigkeit  des  Problems 
(je  glitschiger  der  Tunnel,  desto 
schwieriger  das  Durchqueren),  die  er¬ 
forderliche  Geschicklichkeitsprobe 
erschweren  oder  vereinfachen.  Der 
Spieler  muß  mit  einem  20-seitigen 
Würfel  einen  Wert  erreichen,  der  sei¬ 
nem  Geschicklichkeitswert  ent¬ 
spricht.  Ist  das  Durchqueren  des 
Tunnels  sehr  schwer,  sagt  der  Spiel¬ 
leiter,  daß  eine  Geschicklichkeitspro¬ 
be  plus  drei  erforderlich  ist.  Würde 
also  im  normalen  Falle  ein  Wert  zwi¬ 
schen  eins  und  zehn  reichen,  müßte 
er  in  der  verschärften  Form  einen 
Wert  zwischen  eins  und  sieben  wür¬ 
feln.  Wie  Sie  sehen,  wurde  die  Ver¬ 
schärfung  der  Probe  durch  das  Ver¬ 
ringern  der  Chancen  erreicht. 

In  dieser  Art  und  Weise  nimmt  das 
Spiel  nun  seinen  Lauf.  Und  alle 
Dinge,  die  in  gewisser  Weise  Anfor¬ 
derungen  an  Charaktereigenschaften 
der  Spieler  stellen,  werden  durch 
derartige  Würfelmanöver  geregelt. 
Sicherlich  erkennen  Sie  bereits  hier, 
daß  sich  derartige  Regeln  ausgezeich¬ 
net  für  eine  Umsetzung  auf  einen 
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Computer  eignen.  Der  Rechner  stellt 
einen  unbestechlichen  Spielleiter 
dar,  den  selbst  der  neugierigste  Spie¬ 
ler  nicht  so  nerven  kann,  daß  er  etwas 
von  seinen  Geheimnissen  preisgibt. 
Die  Präzision  und  Schnelligkeit,  mit 
der  er  die  Würfelmanöver  ausführt, 
lassen  alle  unangenehmen  Eigen¬ 
schaften  der  Rollenspiele  verschwin¬ 
den.  Die  übernimmt  nun  der  elektro¬ 
nische  Spielleiter. 


Schwerter  &  Magie 


Bedauerlicherweise  mußten  alle  Be¬ 
sitzer  von  Schneider-Rechnern  bisher 
auf  den  Genuß  derartig  computeri¬ 
sierter  Rollenspiele  verzichten.  Zwar 
gibt  es  auf  anderen  Rechnertypen 
schon  eine  ganze  Reihe  solcher 
Spiele;  so  konnten  Besitzer  von  Com¬ 
putern  wie  dem  C-64  oder  Atari  sich 
an  Spielen  wie  ULTIMA  I,  II  und  III 
oder  XYPHUS  versuchen,  doch  gibt  es 
diese  Spiele  nicht  für  die  CPC’s.  Ganz 
am  Rande  sei  bemerkt,  daß  ich  die 
Hoffnung  auf  eine  Konvertierung 
dieser  ausgezeichneten  Programme 
für  die  CPC’s  noch  nicht  aufgegeben 
habe. 

Allerdings  zeigt  sich  auch  für  Schnei¬ 
der-User  endlich  ein  Silberstreifen 
am  Horizont.  Von  PSS  kommt  eine 
ausgezeichnete  Umsetzung  des  Dun¬ 
geons  &  Dragons  Rollenspiels  für 
den  Amstrad. 

Grundlegend  hat  sich  der  Autor  hier 
an  die  Regeln  des  erwähnten  Spiels 
angelehnt.  So  bauen  die  gesamten 
Kampf-  und  Geschicklichkeitsregeln 
auf  diesem  Grundspiel  auf.  Zu  Be¬ 
ginn  des  Spieles  hat  man  die 
Möglichkeit,  entweder  mit  einem  be¬ 
reits  vorgegebenen  Charakter  zu  spie¬ 
len,  sich  einen  eigenen  Charakter  zu 
erstellen,  oder  aber  ein  früher  begon¬ 
nenes  und  abgesavtes  Spiel  fortzuset¬ 
zen.  Als  erstes  sticht  hier  ins  Auge, 
daß  die  Charaktereigenschaften  nicht 
durch  Würfeln  festgelegt  werden. 
Hier  sieht  es  so  aus,  daß  man  14  Tage 
hat,  in  denen  man  bei  verschiedenen 
Meistern  in  die  Lehre  gehen  kann. 
Während  der  eine  Meister  dem  Spie¬ 
ler  die  hohe  Kunst  des  Schwertkam¬ 
pfes  beibringt,  kann  man  bei  einem 
anderen  die  Diebeskunst  erlernen.  So 
verhält  es  sich  mit  allen  zwölf  ver¬ 
schiedenen  Meistern.  Hat  man  so 
seine  Lehrzeit  absolviert,  kommt 
man  nun  in  den  Spielteil,  in  dem  man 
sich  mit  Ausrüstungsgegenständen 
versehen  kann.  Dazu  stehen  40  Dra¬ 
chenzähne  zur  Verfügung.  Drachen¬ 
zähne  sind  die  in  der  Dungeons  & 
Dragons-Welt  gültige  Währung.  Hat 
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man  sich  nun  derartig  auf  seine 
Mission  vorbereitet,  kann  das  eigent¬ 
liche  Spiel  beginnen.  Wie  auch  bei 
einem  Spiel  mit  natürlichen  Mitspie¬ 
lern  und  einem  menschlichen  Spiel¬ 
leiter  wird  auch  hier  eine  Vorge¬ 
schichte  erzählt.  Hierin  erfährt  man 
von  einem  ausgedehnten  unterir¬ 
dischen  Komplex,  den  legendären 
Katakomben  von  Zob.  Dort  versteckt, 
liegen,  so  wissen  es  alte  Legenden  zu 
berichten,  die  Teile  einer  magischen 
Rüstung,  die  einem  großen  Krieger 
namens  Zob  als  Grabbeigabe  mit  in 
seine  letzte  Ruhestätte  gelegt  wur¬ 
den. 


Die  Katakomben  von  Zob 


Obwohl  alle  Leute,  denen  man  begeg¬ 
net,  von  dem  Unterfangen  in  die  Kata¬ 
komben  einzudringen,  abraten,  ent¬ 
schließen  Sie  sich  natürlich,  nicht  auf 
das  abergläubische  Gewäsch  zu 
hören  und  in  die  stygischen  Tiefen 
der  alten  Nekropole  einzudringen. 
Durch  einen  Schacht,  der  mehrere 
Meter  tief  senkrecht  in  den  Erdboden 
führt,  gelangt  der  Spieler  in  das  Innere 
der  Katakomben  und  findet  sich  un¬ 
versehens  in  einem  Gewirr  von  Tun¬ 
nels,  Quergängen  und  verschlossenen 
Räumen  wieder.  Zu  allem  Überfluß 
bewahrheiten  sich  die  abergläubi¬ 
schen  Geschichten,  die  in  den  nahe¬ 
gelegenen  Dörfern  erzählt  werden.  In 
den  Katakomben  wimmelt  es  regel¬ 
recht  von  unheimlichen  und  gefährli¬ 
chen  Wesen. 

All  die  eben  erwähnten  Informatio¬ 
nen  sind  für  den  Spieler  durch  ein 
wirklich  ausgefeiltes  und  wohldurch¬ 
dachtes  Bedienungskonzept  auf  einen 
Blick  zu  erfassen.  Das  Bildschirm¬ 
display  teilt  sich  in  vier  Bereiche  auf. 
Zwei  dieser  Zonen  befinden  sich  in 
der  oberen  Hälfte  des  Monitors.  Auf 
der  linken  Seite  des  Screens  postiert 
steht  ein  annähernd  quadratisches 
Ausblick-Window.  In  ihm  ist  die 
Umgebung  der  jeweiligen  Blickrich¬ 
tung  in  einer  feinen  3D-Darstellung 
zu  erkennen.  Passagen,  Türen  und 
Quergänge  sind  in  diesem  Fenster  zu 
sehen.  Aber  auch  herannahende 
Monster  und  Ungeheuer  werden  in 
diesem  Fenster  angezeigt. 

Die  Darstellung  dieses  Getiers,  das  uns 
an  allen  Ecken  und  Enden  der  Kata¬ 
komben  begegnet,  kann  rundherum  als 
gelungen  bezeichnet  werden. 

Von  schlangenköpfigen  Monsterkrie- 
gem  bis  zum  bösen  Magier  lassen 
sich  alle  Wesen  gut  erkennen  und 
trotz  der  großen  Darstellung  sind 
diese  Charaktere  auch  noch  animiert. 


Erscheint  am  Ende  eines  Ganges  eine 
solche  Bedrohung,  kann  man  deren 
Herannahen  im  Ausblicksfenster  be¬ 
stens  verfolgen. 

Das  zweite  Window  befindet  sich 
rechts  neben  dem  Ausblicksfenster. 
Hierin  wird  zumeist  eine  Draufsicht 
des  unterirdischen  Komplexes,  in 
dem  man  sich  befindet,  wiedergege¬ 
ben.  Kommt  es  allerdings  zu  einer 
Auseinandersetzung,  wird  diese 
Draufsicht  ausgeblendet  und  die  Sta¬ 
tusanzeigen  der  Kämpfenden  an  der 
gleichen  Stelle  angezeigt. 

Der  dritte  Bereich  nimmt  acht  Zeilen 
unter  den  anderen  bereits  beschriebe¬ 
nen  Fenstern  ein,  und  zieht  sich  über 
die  gesamte  Breite  des  Monitors.  Die¬ 
ses  Fenster  wird  als  das  Text-  und 
Konversations-Display  bezeichnet. 
Da  es  möglich  ist,  sich  mit  den  Mon¬ 
stern,  die  einem  über  den  Weg  laufen, 
zu  unterhalten  oder,  falls  dafür  ge¬ 
eignete  Gegenstände  vorhanden  sind, 
die  Untiere  zu  bestechen,  ist  dieses 
Fenster  eine  Quelle  für  manchmal 
wirklich  verblüffende  Informatio¬ 
nen.  Allerdings  nur  bei  geschickter 
Verhandlung.  Die  letzte  Zeile  des 
Monitors  ist  das  eigentliche  Eingabe- 
Menue.  In  diesem  Zusammenhang  ist 
die  Tatsache  zu  erwähnen,  daß  sich 
Swords  &  Sorcery  mit  insgesamt 
sechs  verschiedenen  Tasten  steuern 
läßt.  Mit  drei  dieser  Tasten  steuert 
man  seinen  Charakter  durch  die  Ka¬ 
takomben,  mit  den  anderen  drei  Ta¬ 
sten  gelangt  man  durch  alle  zur  Ver¬ 
fügung  stehenden  Menues.  Im  Nor¬ 
malfall  befinden  sich  auf  den  unteren 
Zeilen  fünf  Menuepunkte;  durch  das 
Anwählen  dieser  Punkte  gelangt  man 
in  diverse  Untermenues,  über  die  sich 
alles  Mögliche  erreichen  läßt. 
Beispielsweise  führt  die  Wahl  des 
Kampfmenues  ”HIT”  zuerst  in  ein 
Angriffsmenue  und  danach  logischer¬ 
weise  in  ein  Verteidigungsmenue. 
Wählt  man  "MAGIE”,  kann  man  über 
das  folgende  Magiemenue  alle  Zauber¬ 
sprüche  anwählen,  die  dem  Spielcha¬ 
rakter  zu  diesem  Zeitpunkt  zur  Verfü¬ 
gung  stehen. 

Mit  Swords  &  Sorcery  präsentiert  sich 
eine  für  den  Schneider-User  völlig 
neue  Art  und  Weise  des  Abenteuer- 
Spielens.  Englischkenntnisse  sind 
sicherlich  bei  der  Lektüre  der  recht 
umfangreichen  Anleitung  sehr  hilf¬ 
reich,  beim  eigentlichen  Spielen  al¬ 
lerdings  fast  nicht  mehr  notwendig. 
Da  sich  das  gesamte  Spiel  mit  wenigen 
Tasten  steuern  läßt,  ist  die  Ge¬ 
wöhnungsfrist  sehr  kurz,  und  schon 
bald  kann  man  sich  uneingeschränkt 
mit  den  kniffeligen  Problemen,  die 
sich  im  Laufe  des  Spieles  eröffnen, 
befassen.  (HS) 
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Cheap  Thrills 


Die  Zeiten,  in  denen  man  anständige 
Software  nur  zu  manchmal  astrono¬ 
misch  hohen  Preisen  kaufen  konnte, 
sind  Gottlob  schon  seit  einiger  Zeit 
vorbei.  Sicherlich  ist  die  Argumentation 
der  Software-Industrie,  die  da  besagt, 
daß  Programme  durch  die  exzessive 
Raubkopiererei  so  teuer  sein  müßten, 
um  den  dadurch  entstandenen  Schaden 
zu  kompensieren,  noch  jedermann  im 
Ohr. 

War  in  1983  noch  so  manches  Pro¬ 
gramm  nicht  unter  150,-  DM  zu  ha¬ 
ben,  pendelte  man  sich  schon  1984 
bei  Preisen  um  50,-  DM  ein.  Mit  dem 
Aufkommen  sogenannter  Budget  La¬ 
bels  sanken  die  Preise  noch  weiter. 
Man  entwickelte  in  diesem  Zusam¬ 
menhang  Spiele,  die  als  sogenannte 
Affektartikel  in  Wühltischen  und  an 
Kaufhauskassen  dem  potentiellen 
Kunden  präsentiert  wurden.  Die 
SOFTWARE  SUPER  SAVERS,  wie 
das  Budget  Label  von  Software  Pro¬ 
jekts  genannt  wurde,  fand  einen 
allseits  großen  Anklang  beim  Kun¬ 
den.  So  dauerte  es  dann  auch  nicht 
lange,  bis  andere  Firmen  den  offen¬ 
sichtlich  guten  Gedanken  aufgriffen, 
und  ebenfalls  eigene  Budget  Labels 
ins  Leben  riefen.  Aber  auch  jetzt  noch 
unterlag  die  Konzeption  der  Billig¬ 
software  Veränderungen.  Hatte  man 
anfangs  Programme  veröffentlicht, 
die  von  der  Qualität  ein  gutes  Mit¬ 
telmaß  darstellten,  aber  noch  nicht 
gut  genug  waren  in  den  Hauptserien 
der  Unternehmen  einen  Platz  zu  fin¬ 
den  und  daher  in  die  Budget  Labels 
geschoben  wurden,  änderte  sich  das 
mit  dem  Einstieg  eines  Softwarehau¬ 
ses,  das  nur  Billigspiele  verkaufte. 
Mastertronic  trieb  mit  seinen  Pro¬ 
dukten  so  manchem  gestandenen  Pro¬ 
grammhersteller  den  Angstschweiß 
auf  die  Stirn.  Denn  erstmals  wurde 
den  Kunden  qualitativ  hochwertige 
Software  zu  einem  echten  Taschen¬ 
geldpreis  vorgesetzt.  Aber  wo  Licht 
ist,  da  gibt  es  auch  Schatten,  und  in 
dem  umfangreichen  Angebot,  das 
sich  an  die  Besitzer  fast  aller  gängigen 
Rechnertypen  wandte,  befand  sich 
auch  so  mancher  Flop.  Zwar  ist  ein 
Flop,  der  nur  15,-  DM  kostet,  weni¬ 
ger  tragisch  als  ein  Flop  für  40,-  DM; 
ärgerlich  bleibt  er  aber  allemal. 

Wie  schon  erwähnt,  wird  das  Unter¬ 
nehmen  Mastertronic  wie  kein  ande¬ 
rer  mit  Budget  Software  in  Verbin¬ 
dunggebracht.  Dies  ist  nicht  verwun¬ 
derlich,  da  man  bei  Mastertronic 
ausschließlich  auf  die  Herstellung 
von  Billigsoftware  spezialisiert  ist. 
Martin  Alpers,  der  Managing  Director 
von  Mastertronic  GB,  sagt,  daß  es  in 
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den  Anfangstagen  des  Unternehmens 
zwar  einige  Stimmen  in  der  Branche 
gab,  die  im  Konzept  ausschließlicher 
Budged  Softwaren,  eine  arge  Gefahr 
für  den  Markt  sahen.  Allerdings  habe 
sich  das  mit  der  Zeit  gelegt.  Sicherlich 
schaut  man  bei  anderen  Unterneh¬ 
men  neidisch  auf  die  Verkaufszah¬ 
len,  die  Mastertronic  mit  seinen  Pro¬ 
dukten  erreicht.  Laut  einer  Gallup 
Erhebung  ist  fast  jedes  sechste  ver¬ 
kaufte  Computerspiel  in  England  ein 
Mastertronic-Produkt.  Martin  Alpers 
bemerkt  hierzu,  daß  dieses  Verhältnis 
bei  einigen  großen  Händlerketten 
sogar  bei  sieben  oder  acht  zu  eins 
läge. 

Wir  haben  Ihnen  an  dieser  Stelle 
so  etwas  wie  einen  kleinen  Einkaufs¬ 
führer  zusammengestellt,  der  aller¬ 
dings  keinerlei  Anspruch  auf  Voll¬ 
ständigkeit  erhebt. 


Shorts  Fuse 


Der  Titel  dieses  Spieles  bedeutet 
soviel  wie  kurze  Lunte.  Und  um  Lun¬ 
ten  und  Bomben  geht  es  dann  auch. 

Denn  Sie  sollen,  als  Spezialagent 
einer  Anti-Terror-Truppe,  Bomben¬ 
anschläge  auf  bedeutende  Baudenk¬ 
mäler  verhindern.  Aufgemacht  ist  das 
Spiel  wie  Manie  Miner.  In  verschie¬ 
denen  Bildern  sollen  Sie  nun  die  Zün¬ 
der  der  Bomben  entschärfen.  Diese 
Zünder  sind  über  ein  Plattform  Sy¬ 
stem  verteilt,  in  dem  es  gilt,  durch 
Umherhüpfen  und  Benutzen  der 
Lifts,  die  Zünder  zu  erreichen.  Gra¬ 
fikmäßig  ist  "Shorts  Fuse”  recht  gut 
gelungen,  guter  Durchschnitt  also.  Al¬ 
lerdings  ist  es  von  der  Programmie¬ 
rung  ein  wenig  mißglückt.  Die  Bewe¬ 
gungen  des  Männchens  sind  ruckartig 
und  an  einigen  Stellen  verliert  man 
unversehens  ein  Leben,  obwohl  man 
sich  in  einer  scheinbar  sicheren 
Situation  befindet.  Positiv  ist,  daß  je¬ 
des  Level  einen  Code  hat.  Das  heißt, 
ist  es  erst  einmal  gelungen,  bis  in  das 
zweite  Level  vorzudringen,  braucht 
man  bei  einem  späteren  Spiel  nicht 
im  ersten  Bild  anzufangen.  Man  gibt 


einfach  den  Code  für  Level  zwei  ein 
und  beginnt  dann  sogleich  im  ange¬ 
wählten  Bild. 


Mr.  Freeze 


Mr.  Freeze,  der  große  Chefenteiser, 
macht  sich  daran,  in  einem  Tiefkühl¬ 
haus  für  Ordnung  zu  sorgen.  Dort 
scheint  einiges  außer  Kontrolle  gera¬ 
ten  zu  sein.  So  gibt  es  in  diesem  Lager 
Strahler  von  fataler  Wirkung.  An  den 
Decken  der  einzelnen  Sektionen  des 
Lagers  angebracht,  fahren  sie  auf 
Schienen  hin  und  her.  So  sind  sie  in 
der  Lage,  jedes  bewegliche  Objekt  in 
ihrer  Zone  mit  ihren  tödlichen 
Eisstrahlem  zu  erreichen.  Die  Auf¬ 
gabe,  die  Mr.  Freeze  nun  hat,  ist  das 
Ausschalten  dieser  gefährlichen  Ein¬ 


richtung.  Ferner  befindet  sich  ein 
Kontrollbord  in  jeder  Sektion.  Diese 
muß  Mr.  Freeze  erreichen  und 
deaktivieren. 

Grundsätzlich  handelt  es  sich  hier 
um  ein  Jump  &  Run-Spiel,  allerdings 
in  einer  leicht  abgewandelten  Form. 
Zwar  muß  man  auch  hier  genaue¬ 
stem  überlegen,  auf  welchem  Wege 
man  am  besten  ans  Ziel  kommt,  aber 
um  die  gestellten  Aufgaben  zu  erfül¬ 
len,  benötigt  man  weniger  schnelle 
Reflexe,  als  eine  gute  Strategie  und 
gekonntes  Timing. 

Von  der  Grafik  her  vermag  dieses 
Spiel  nicht  zu  überzeugen,  auch 
wurde  am  Sound  gespart,  denn  abge¬ 
sehen  von  einigen  Geräuschen  ist 
hier  nichts  zu  vernehmen.  Mr.  Freeze 
ist  eines  der  weniger  gelungenen  Bei¬ 
spiele  für  Billig-Software. 


The  wild  Bunch 


Während  Sie  eines  Abends  vom 
Saloon  nach  Hause  reiten,  sehen  Sie 
einen  schwer  angeschossenen  Mann 
am  Straßenrand  liegen.  Hilfsbereit, 
wie  Sie  sind,  eilen  Sie  dem  Ärmsten 
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zu  Hilfe.  Der  Verwundete  kann  noch 
einige  Worte  stammeln.  Er  sagt  Ihnen 
mit  ersterbender  Stimme  alles,  was  er 
über  seinen  Mörder  weiß,  dann  stirbt 
er  in  Ihren  Armen. 

Neben  dem  Mann  liegt  die  Waffe,  mit 
der  die  Bluttat  begangen  wurde. 
Kaum  haben  Sie  diese  Waffe  in  die 
Hand  genommen,  erscheint  auch 
schon  der  Sheriff  auf  der  Bildfläche. 
Er  sieht  Sie,  den  Toten  und  die  Waffe 
in  Ihrer  Hand.  Natürlich  ist  für  ihn 
die  Sache  klar.  Mit  knapper  Not  kön¬ 
nen  Sie  entkommen.  Die  einzige 
Möglichkeit  Ihre  Unschuld  zu  be¬ 
weisen,  besteht  darin,  den  wahren  Tä¬ 
ter  zu  finden  und  ihn  dem  Sheriff 
zu  übergeben. 

Mit  "Wild  Bunch”  liegt  eine  Art  von 
Menue- Abenteuer  vor. 


Sie  können  von  Stadt  zu  Stadt  reisen, 
dort  die  verschiedensten  Institutio¬ 
nen  aufsuehen,  den  Saloon  besu¬ 
chen,  Pokern,  oder  falls  Sie  glauben, 
den  Täter  entdeckt  zu  haben,  einen 
Streit  vom  Zaun  brechen,  der  dann 
natürlich  in  einem  Duell  auf  der 
Straße  endet.  Diese  Duelle  sind  dann 
auch  der  einzige  Teil  des  Spieles,  bei 
dem  es  auf  Reaktion  an  kommt  Alles 
in  allen  eigentlich  ein  gelungenes 
Programm.  Ärgerlich  ist  nur,  daß  Sie 
sofort  ins  Gefängnis  kommen,  wenn 
Sie  die  falschen  Leute  erschießen. 


Willow  Pattern 


Hier  geht  es  darum,  eine  süße  kleine 
Chinesenmaid  zu  befreien.  Sie  soll 
nämlich  einen  bösen  Mandarin 
heiraten,  den  sie  allerdings  nicht  ein 
bißchen  liebt.  Ihr  Herz  gehört  einem 
jungen  Chinesen,  dessen  Part  Sie 
übernehmen.  Dieser  Herr  versucht 
nun,  in  die  streng  bewachten  Gemä¬ 
cher  des  Mädchens  vorzudringen, 
um  mit  ihr  zu  fliehen.  Natürlich  wird 
der  Weg  dorthin  auf  das  Beste  be¬ 
wacht.  Unser  schlitzäugiger  Held  hat 
nun  alle  Hände  voll  zu  tun.  Willow 
Pattem  ist  ein  Arcade-Adventure  be¬ 
ster  Machart.  Um  seinen  Weg  durch 
das  umfangreiche  Labyrinth  bis  zu 
dem  Mädchen  zu  finden,  bedarf  es 
einiger  Geschicklichkeit.  Geschick¬ 
lichkeit  ist  dann  auch  der  Punkt,  auf 


den  es  bei  diesem  Spiel  in  erster  Linie 
ankommt.  Denn  an  verschiedenen 
Stellen  wird  der  Weg  von  gedungenen 
Samurais  versperrt,  die  ständig  mit 
ihren  Schwertern  herumfuchteln  und 
manchmal,  wenn  man  ihnen  zu  nahe 
kommt,  auch  einmal  ein  Schwert 
nach  unserem  Helden  werfen.  Ge¬ 
lingt  es,  diesen  mörderischen  Wurfge¬ 
schossen  auszuweichen,  kann  man 
diese  dann  aufnehmen  und  sie 
seinerseits  zurückwerfen,  um  den 
Weg  freizumachen. 

Prädikat:  empfehlenswert. 


Chimera 


Ein  außerirdisches  Raumschiff  nä¬ 
hert  sich  der  Erde.  An  Bord  befindet 
sich  eine  tödliche  Fracht.  Sollte  es 
nicht  gelingen,  das  Vordringen  des 
fremden  Schiffes  zu  stoppen,  würde 
dies  das  Ende  der  Menschheit  bedeu¬ 
ten.  Ein  irdisches  Raumschiff  wird 
ausgesandt,  den  fremden  Eindring¬ 
ling  zu  stoppen.  Einem  einzelnen 
Mann  gelingt  es,  an  Bord  des  fremden 
Raumschiffes  zu  gelangen.  Hier  muß 
er  erkennen,  daß  es  sich  um  ein  Gei¬ 
sterschiff  handelt,  das  einige  tausend 
Tonnen  tödlicher  Viren  geladen  hat. 
Er  alleine  kann  den  Fortbestand  der 
Menschheit  sichern,  wenn  es  ihm  ge¬ 
lingt,  den  Selbstzerstörungsmechanis¬ 
mus  des  fremden  Schiffes  zu  finden 
und  zu  aktivieren. 


Angesiedelt  in  einem  Ultimate- 
artigen  Szenario  richtet  sich  Chi¬ 
mera  in  erster  Linie  an  Hirnakroba¬ 
ten.  Geschicklichkeit  wird  eher  klein 
geschrieben.  Es  gilt  herauszufinden, 
mit  welchen  Gegenständen  man 
unter  welchen  Umständen  welches 
Resultat  erzielen  kann.  Auch  über 
Chimera  kann  man  sagen,  daß  es  sich 
hier  um  eines  der  besseren  Spiele 
handelt.  Denn  sowohl  von  der  Grafik 
als  auch  vom  Spielwitz  bekommt 
man  hier  einiges  für  sein  Geld 
geboten. 


TG-Soft 


*  Beratung,  Hardware,  Software 

*  Personal  Computer,  Systeminstallation,  Branchenlösungen 

*  Spezialsoftware  nach  Vorstellung  des  Kunden 


VORTEX-Produkte  SEIKOSHA-Produkte 


F1-S  5.25"  Einzellaufwerk 

1090,- 

Druckerinterface  DU 

F1-D  5.25"  Doppellaufwerk 

1 550 

GP700CPC  50cps 

799  — 

komb.  1  Computer  m.  2  Druckern 

185,— 

Fl  -X  5.25"  2.  Laufwerk  1  MB! 

709,- 

SP  1000  C  PC  lOOcps 

829,— 

Druckerinterface  DI2 

M1-S  3.5"  Einzellaufwerk 

909,- 

MP  1 300  AI  300cps 

1 699,- 

komb.  2  Computer  m.  2  Druckern 

295  — 

M1-D  3.5"  Doppelstation 

1419,- 

MS  1 5  Typenraddr.  1 5cps 

759,— 

Software 

3.5"  Winchesterstationen 

Leiterplattenentflechtung 

149,— 

WD10  10MB 

WD20  20MB 

2599- 

3189,- 

MAXELL-Produkte 

Vereins  Verwaltung 

69,— 

SP-64  (64K  RAM-Karte) 

255- 

3"  CF2  Diskette 

10,95 

SP-1 28  (1 28K  RAM-Karte) 

325,- 

3.5"-Diskette 

7,20 

Tel.  Bestellmögllchkelt 

SP-256  (256K  RAM-Karte) 

450,- 

5.25"-Diskette 

6,20 

tägl.  von  1 4  bis  1 9  Uhr! 

SP-320  (320K  RAM-Karte) 

489,- 

Joystick 

36,— 

SP-512  (51 2K  RAM-Karte) 

535,- 

Recorder  f.  664/6128 

69,— 

Der  Versand  erfolgt  gegen  Nachnahme 

VHF-1  VHF-Modulator 

228,- 

Druckerkabel 

75,— 

oder  Vorauskasse  (2  %  Skonto). 

TG-Soft,  Offersdorf  5,  8491  Rimbach,  Tel.:  09941/3765 
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Don’t  Panic 


Auf  den  Verladerampen  eines  großen 
Raumflughafens  ist  die  Hölle  los. 
Irgend  jemand  hat  Unmengen  von 
stark  radioaktivem  Müll  überall  auf 
der  Rampe  verteilt  Außerdem  ist  ein 
gar  greuliches  Monster  aus  seiner 
Frachtkiste  entkommen.  Gesucht 
wird  nun  ein  Mutiger,  der  es  wagt,  all 
den  radioaktiven  Müll  von  der 
Rampe  zu  beseitigen,  so  daß  die  Fän¬ 
gertrupps  darangehen  können,  das 
Monster  wieder  einzufangen. 

Die  betreffende  Verladerampe  wird 
als  horizontal  scrollendes  Bild  mit 
vier  Ebenen  dargestellt.  Nur  an  be¬ 
stimmten  Stellen  ist  es  möglich,  zwi¬ 
schen  den  einzelnen  Ebenen  hin- 
und  herzuwechseln.  Der  Spieler  muß 
schon  genau  aufpassen,  daß  er  immer 
die  richtige  Ebene  wählt,  und  sich 


rechtzeitig  nach  einem  Durchlaß  zu 
einem  anderen  Level  umsieht.  Ge¬ 
lingt  da«  nicht,  läuft  er  automatisch 
dem  gnadenlosen  Ungeheuer  in  die 
Arme. 

Auch  dieses  Spiel  ist  wieder  ein  Bei¬ 
spiel  für  ein  weniger  gelungenes 
Produkt.  Fade  Grafikeffekte  tragen 
ebenfalls  dazu  bei,  daß  ”Don’t  Panic” 
ein  Spiel  ist,  das  man  sicherlich  bald 
wieder  vergißt. 

Die  Zusammenstellung  der  Firebird 
Titel  erhebt  natürlich  nicht  den  An¬ 
spruch,  vollständig  zu  sein.  Ebenso 
verhält  es  sich  mit  der  nun  folgenden 
Vorstellung  von  Mastertronic-Pro- 
grammen. 


Soul  of  a  Robot 


Der  Versuch,  den  Computerdiktator 
außer  Betrieb  zu  setzen,  schlug  fehl. 
Zu  allem  Überfluß  wird  der  Rechner 
mit  zunehmendem  Alter  instabil.  Er 
droht  sich  selbst,  und  damit  auch  den 
ganzen  Planeten,  zu  vernichten.  Wie¬ 
derum  versucht  man,  das  Elektronen¬ 
gehirn  mittels  eines  Roboters  außer 
Gefecht  zu  setzen.  Doch  diesmal 
nicht  mit  einem  Suchdroiden,  son¬ 


dern  mit  einem  Roboter,  der  über  eine 
ganz  besondere  Programmierung 
verfügt.  Sein  Gehirn  ist  wie  die  Seele 
eines  Menschen  angelegt  und  er  ist 
sich  der  Diskrepanz  seiner  Existenz 
voll  bewußt  Die  menschliche  Seele 
im  Robotkörper  hat  nur  ein  Ziel  -  zu 
sterben.  Dies  kann  sie  aber  erst  nach 
Beendigung  der  ihr  gestellten  Auf¬ 
gabe:  der  Vernichtung  des  Diktators. 
"Soul  of  a  Robot”  ähnelt  nicht  von 
ungefähr  dem  ersten  hier  vorgestell¬ 
ten  Mastertronic  Spiel.  Es  ist  sozusa¬ 
gen  der  zweite  Teil.  War  das  zentrale 
Spielthema  von  Nonterraqueus  das 
Herumfliegen  und  Abschießen  von 
Wächterdroiden,  ist  es  diesmal  eher 
ein  Jump  &  Run-Spiel  geworden. 
Auch  ist  das  Spielfeld  bei  weitem 
nicht  mehr  so  groß.  Allerdings  hat 
man  auch  hier  alle  Hände  voll  zu  tun, 
um  ans  Ziel  zu  kommen.  Von  der 
Grafik  hat  sich  eigentlich  nicht  viel 


verändert;  zwar  sieht  alles  anders  aus 
als  in  Nonterraqueus,  ist  aber  von  der 
Machart  her  das  gleiche  geblieben. 
Beim  Spielen  selbst  kommt  minde¬ 
stens  ebensoviel  Freude  auf,  wie  beim 
ersten  Teil. 


Into  Oblivion 


Um  die  Trilogie  um  den  machthung¬ 
rigen  Supercomputer  zu  komplettie¬ 
ren,  brachte  Mastertronic  vor  kurzem 
den  dritten  und  (hoffentlich)  letzten 
Teil  heraus.  Die  Mission  des  beseel¬ 
ten  Roboters  war  von  Erfolg  gekrönt 
Es  gelang,  das  machtbesessene  Com- 
putergehim,  das  inzwischen  42  ver¬ 
schiedene  Planeten  beherrschte,  außer 
Gefecht  zu  setzen.  Doch  überall  in 
seinem  ehemaligen  Machtbereich  sind 
seine  mechanischen  Schergen  noch 
aktiv.  Wie  in  jeder  Weltraumlegende 
gibt  es  auch  hier  den  sagenumwobe¬ 
nen,  sicheren  Planeten,  von  dem  all 
die  Bösewichter,  die  in  der  Galaxis 
umherschwirren,  nichts  wissen.  Nur 
ausgerüstet  mit  einem  kleinen  Kampf¬ 
gleiter,  macht  sich  ein  Mutiger  daran, 
diese  Welt  zu  suchen.  Die  Reise  be¬ 
ginnt  auf  dem  Planeten  Safrik. 


Die  Aufgabe  des  Spielers  besteht 
darin,  auf  jedem  Planeten  die  Raum¬ 
flughäfen  aufzusuchen  und  die  dort 
stehenden  Raumschiffe  auf  ihren 
Kurs  zu  untersuchen  bzw.  diesen 
durch  Ausprobieren  herauszubekom¬ 
men.  Mittels  dieser  Taktik  sollte  es 
laut  Bedienungsanleitung  möglich 
sein,  den  Planeten  Oblivion,  eben 
jene  legendäre  Friedenswelt,  zu 
finden. 

Das  hier  vorliegende  Spiel  ist,  meines 
Erachtens,  das  mit  Abstand  schlech¬ 
teste  Spiel  der  Trilogie!  Trotz  einer 
akzeptablen  Grafik  konnte  ich  mich, 
selbst  nach  längerem  Spielen,  nicht 
mit  dem  Programm  anfreunden.  Ef¬ 
fektiv  bestehen  die  vom  Spieler  gefor¬ 
derten  Handlungen  darin,  ein  Raum¬ 
schiff  nach  dem  anderen  zu  besteigen 
und  von  Welt  zu  Welt  zu  reisen.  Die 
Unterschiede  zwischen  den  einzel¬ 
nen  Planeten  bestehen  lediglich  in 


der  Anzahl  der  auf  ihnen  befindli¬ 
chen  Räume,  die  zwischen  zwei  und 
fünf  variieren,  und  der  Anzahl  der 
darauf  postierten  Raumschiffe.  Die 
Raumschiffe  des  Robot-Diktators 
sind  selten  stupide.  Einmal  materia¬ 
lisiert  verfolgen  sie  stur  ein  und  den¬ 
selben  Kurs.  Sobald  sie  ein  Hindernis 
oder  den  Screen-Rand  erreichen,  ex¬ 
plodieren  sie,  nur  um  wenig  später 
wieder  zu  erscheinen  und  dieselbe 
Prozedur  mit  fast  nicht  erkennbaren 
Veränderungen  wieder  aufzunehmen. 
Fazit:  Finger  weg! 


Caves  of  Doom 


Es  sieht  fast  so  aus,  als  sei  es  Ma¬ 
stertronic  gelungen,  für  dieses  Spiel 
einen  guten  Kollegen  von  Buck 
Rogers  und  Flash  Gordon  zu  ver¬ 
pflichten.  Denn  das,  was  der  kleine, 
namenlose  Kerl  auf  dem  Planeten 
an  Unheil  erlebt,  wäre  sicherlich  kein 
schlechter  Comic  geworden. 

Bereits  nach  einer  kurzen  Zeit,  die 
unser  Freund  der  Erforschung  des 
seltsamen  Planeten  widmet,  wird  er 
von  den  Schergen  des  Herrn  der  Fin¬ 
sternis  gefangen.  Dieser  hat  sich  auf 
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diesen  Planeten  zurückgezogen  und 
mag  es  gar  nicht,  wenn  seine  Bosheits- 
Experimente  durch  Fremde  gestört 
werden.  Natürlich  gelingt  es  dem  Hel¬ 
den.  nach  kurzer  Zeit,  aus  der  unmit¬ 
telbaren  Haft  des  Bösewichts  zu  ent¬ 
kommen.  Allerdings  muß  er  nun  noch 
durch  die  ausgedehnten,  unterirdischen 
Katakomben.  Der  Herr  des  Unheils 
hat  tausende  seiner  Handlanger  aus¬ 
gesandt,  um  ein  Entkommen  zu  ver¬ 
hindern. 

Mit  30  fertigen  Bildern,  die  ausge¬ 
sprochen  abwechslungsreich  sind, 
überrascht  "Caves  of  Doom”  den  Be¬ 
trachter.  Zwar  ist  es  damit  nicht  ge¬ 
rade  das  umfangreichste  Mastertronic- 
Produkt,  gehört  aber  zweifelsohne  in 
deren  Oberliga.  Denn  außerdem  be¬ 
kommt  man  zu  einem  ausgezeichne¬ 
ten  Jump  &  Run-Spiel  noch  einen 
Screen-Editor,  mit  dem  man  sich  aus 
256  vordefinierten  Zeichen  neue. 


eigene  Bilder  zusammenbasteln  und 
diese  zum  späteren  Spielen  auf  Kas¬ 
sette  abspeichern  kann.  Wohl  mit  das 
spielbarste  Budget-Programm  auf 
dem  Markt. 


Finders  Keepers 


Ein  König  hat  Sorgen.  Seine  Tochter 
hat  morgen  Geburtstag,  und  trotz 
Überlegen  und  Grübeln  will  ihm  kein 
passendes  Geschenk  einfallen.  Hätte 
sich  nicht  einer  der  treuesten  Vasal¬ 
len  des  Königs  bereit  erklärt,  die  Sa¬ 
che  mit  dem  Geschenk  zu  regeln,  wäre 
dem  Herrscher  eine  peinliche  Szene 
wohl  nicht  erspart  geblieben.  Der  ma¬ 
gische  Ritter  bricht  zur  Burg  Sprite- 
land  auf,  um  dort  ein  passendes  Ge¬ 
schenk  zu  suchen. 

Finders  Keepers  ist  ein  100%-iger 
Vertreter  der  Arcade-Abenteuer,  mit 
leichten  Anklängen  an  das  Jump  & 
Run-Genre. 

Bekannterweise  lebt  ein  solches  Spiel 
von  den  Puzzle-Aufgaben,  die  dem 
Spieler  in  dessen  Verlauf  aufgegeben 
werden.  Viele  Anfragen  an  die  Spiele- 
Redaktion  beweisen,  daß  diese  Rätsel 
nicht  gerade  leicht  sind.  Hartgesotte- 
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nen  Abenteuer-Freaks  wird  hier  eine 
echte,  harte  Nuß  präsentiert,  bei  der 
manchmal  nicht  nur  das  Hirn¬ 
schmalz  zu  kochen  anfängt.  Mit 
einem  kleinen  Vorbehalt,  bedingt 
durch  die  Schwierigkeit  des  Spiels,  ist 
es  trotz  allem  eine  echte  Bereicherung 
für  jede  Programmsammlung. 

Der  Autor  dieses  Programms,  David 
Jones,  hat  eine  wirklich  phantasie¬ 
volle  Spielwelt  erschaffen. 

Seit  einiger  Zeit  bemüht  sich  Ma- 
stertronic,  trotz  hervorragend  laufen¬ 
den  Geschäfte,  auf  dem  Budget-Sektor 
einen  Hybriden  zwischen  der  alther¬ 
gebrachten  Billigsoftware  und  der  re¬ 
gulären  Preisklasse  zu  schaffen. 
Diese  sogenannten  MAD-Games  ko¬ 
sten  durchschnittlich  18,-  DM  und 
sind,  soweit  es  den  Schneider  betrifft, 
Spiele  von  gehobener  Qualität.  MAD 
steht  für  Mastertronic  s  added  Dimen- 
sions.  Dieses  Gütezeichen  soll  eine 


neue  Software-Ära  einläuten.  Spiele, 
die  an  Qualität  den  regulären  Pro¬ 
dukten  der  Software-Industrie  um 
nichts  nachstehen,  eher  noch  besser 
sind,  sollen  diesem  neuen  Label  zu¬ 
gehören.  Leider  ist  von  den  fünf  oder 
sechs  bereits  erschienenen  Titeln  nur 
einer  für  die  Schneider  Computer.  Es 
ist  sozusagen  die  Fortsetzung  von 
"Finders  Keepers”.  Geschrieben  wur¬ 
de  es  wiederum  vom  Mastertronic- 
Wunderknaben  David  Jones,  der  sich 
lediglich  bei  der  Musik  von  Ed 
Hickman  unterstützen  ließ. 


Spellbound 


In  Spellbound  begegnen  wir  dem  be¬ 
kannten  Helden  aus  "Finders  Keepers”, 
dem  magischen  Ritter.  Diesmal  besteht 
seine  Aufgabe  darin,  seinen  derzeiti¬ 
gen  Lehensherrn,  Gimball,  den  Ma¬ 
gier,  aus  einer  besonders  verzwickten 
Situation  zu  retten.  Bei  dem  Versuch, 
einen  Reispudding  mittels  alter,  ma¬ 
gischer  Beschwörungen  zu  verbes¬ 
sern,  unterläuft  dem  Zauberer  ein  fa¬ 
taler  Fehler.  Er  zitiert  einen  der  Sprü¬ 
che  falsch  und  landet  unversehens  im 


Schloß  von  Kam,  einer  Burg  am  Ende 
der  Zeit.  Der  angewandte  Zauber¬ 
spruch  war  allerdings  so  machtvoll, 
daß  er  noch  einige  andere  Leute  aus 
ihrer  Zeit  herausriß  und  ebenfalls 
versteinert  im  Schloß  von  Karn  zu¬ 
rückließ.  Die  letzte  Rettung  ist  der 
magische  Ritter. 

Wie  schon  das  vorgenannte  Spiel, 
"Finders  Keepers”,  ist  auch  ”Spell- 
bound”  ein  hochkarätiges  Arcade- 
Adventure.  Allerdings  eines  von  einer 
neuen  Machart,  denn  die  Steuerung 
erfolgt  ausschließlich  über  den 
Joystick. 

Trotz  der  Vielzahl  von  Möglichkei¬ 
ten  gelang  es  David  Jones,  ein  wirk¬ 
lich  akkurat  funktionierendes  Steuer¬ 
system  vorzulegen.  Alle  Handlungen, 
die  in  Spellbound  notwendig  sind,  er¬ 
folgen  über  Pull-Down-Menues,  die 
sich  nach  Drücken  des  Feuerknopfes 
als  Windows  auf  dem  Bildschirm  ent¬ 


rollen.  Auch  hier  wieder  wird  dem 
Spieler  ein  Programm  mit  einem  aus¬ 
geprägten  Puzzle-Charakter  vorge¬ 
legt.  Eine  gelungene  Grafik,  die  von 
einem  gut  gemachten  Musikstück 
untermalt  wird,  trägt  das  ihrige  zum 
gelungenen  Ganzen  des  Spieles  bei. 
Mit  Spellbound  versucht  Mastertronic 
neue  Wege  zu  gehen.  Inwieweit  an¬ 
dere  Budget-Labels  sich  diesen  ge¬ 
setzten  Trends  anschließen  und  die 
Ideen  aufgreifen,  bleibt  abzuwarten. 
Sicherlich  haben  die  MAD-Games 
nicht  nur  auf  dem  Schneider  Compu¬ 
ter  ihre  Freunde  gefunden. 

Sollten  Sie  sich  für  das  eine  oder  an¬ 
dere  hier  vorgestellte  Spiel  interessie¬ 
ren,  möchte  ich  auf  zurückliegende 
Ausgaben  unseres  Magazins  hinwei- 
sen,  in  denen  bereits  eine  ganze  Reihe 
von  Budget-Programmen  reviewt 
wurden.  Wie  Sie  sehen,  befindet  sich 
der  Markt  im  Umbruch.  Neue  Ideen 
und  Konzepte  suchen  ihre  Abneh¬ 
mer.  Wohin  diese,  doch  recht  innova¬ 
tive  Geschäftspolitik  führt,  welche 
Akzente  sie  auf  dem  heiß  umkämpften 
Markt  setzt  bleibt  abzuwarten.  Ich 
denke,  wir  werden  nicht  enttäuscht 
werden. 

Also,  warten  wir  ab  und  genießen. 

(HS) 
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CPC  464 ,  664  +  6128  Software 


S  TA  R-  WRITER I 

Das  zur  Zeit  mit  Abstand  leistungsfähigste  Textsystem  für  den  CPC,  das  völlig  neue  Maßstäbe 
in  Bedienung  und  Leistung  setzt! 


•  Einfache  Bedienung  durch  PULL-DOWN  Menues 

•  Deutsche  DIN-Tastatur  mit  Aufkleber 

•  Integrierte  Adreßverwaltung  im  Direktzugriff 

•  Integriertes  Grafikprogramm  zur  Erstellung  von  Brief¬ 
köpfen 

•  Integriertes  DFÜ-Programm  für  die  Schneider-Schnitt¬ 
stelle 

•  Integrierter  Zeicheneditor  zur  Erstellung  von  1 0  Zei¬ 
chensätzen 

•  Anpaßbar  an  jeden  Drucker  der  auf  dem  Markt  erhält¬ 
lich  ist 

•  Integrierte  Tabellenkalkulation  im  Textprogramm 

•  Basicprogramme  können  eingelesen  und  bearbeitet 
werden 

•  Komfortable  Diskettenverwaltung  (löschen,  kopieren, 
umbenennen. . .) 

•  Ränder  frei  wählbar 

•  Trennvorschläge 

•  Zentrieren 

•  Formatierte  Ausgabe  auf  dem  Bildschirm 

•  Umfangreiche  Blockoperationen 

•  Umformatieren  auf  andere  Formate 

•  Zeichen  einfügen  und  löschen 

•  Zeilen  einfügen  und  löschen 

•  Absätze  einfügen  und  löschen 

•  Kopf-  und  Fußzeilen  frei  änderbar 

•  Blocksatz 

•  Flattersatz 

•  Suchen  und  Ersetzen 

•  Serienbrieffunktion 

•  „MERGE"-Funktion 

•  Fließtexteingabe 

•  Wordwrap 


Jetzt 

Version  2.0 


A  ch  tung  an  alle  Vortex -A  n  wender! 

Ab  sofort  alle  Programme  auf  51/,  Zoll  Dis¬ 
ketten  unter  VDOS  2.0  lieferbar. 

Die  hohe  Speicherkapazität  und  alle 
anderen  Vorzüge  des  Laufwerks  werden 
von  den  Programmen  voll  ausgenutzt! 


•  Bausteinverarbeitung 

•  9  verschiedene  Layouts 

•  Proportionalschrift 

•  Hervorhebungen  wie:  Unterstreichen,  Fettdruck,  Dop¬ 
peldruck,  Kursiv,  doppelte  Breite,  Schmalschrift,  NLQ . . . 

•  Mathematische  Formelschreibweise  (Hoch-  und  Tief¬ 
stellen) 

•  Definierte  Zeichensätze  können  auf  entsprechendem 
Drucker  ausgegeben  werden  (z.  B.  Russisch  oder  Fran¬ 
zösisch). 


Software  des  Jahres  Platz  3 

STAR-WRITER  I,  ein  Textsystem  der  Superlative, 
wurde  schon  nach  einem  Monat  Marktanwesenheit 
bei  der  Wahl  zur  Software  des  Jahres  auf  den  drit¬ 
ten  Platz  gewählt.  Diese  Wahl  bestätigt  den 
Anspruch  von  STAR-WRITER  I,  ein  Textsystem  der 
Superlative  zu  sein,  völlig.  Sollten  Sie  noch  an  STAR- 
WRITER  I  zweifeln,  fordern  Sie  unser  kostenloses  In¬ 
formationsmaterial  an. 


COPY-STAR II 

ist  die  ideale  Befehlserwei¬ 
terung  für  Druckerbesitzer, 
denn  es  stellt  für  alle  gängi¬ 
gen  Drucker  Hardcopyfunk¬ 
tionen  in  verschiedenen 
Größen  zur  Verfügung.  So¬ 
gar  Farbbilder  lassen  sich 
schattiert  ausgeben. 
COPY-STAR  II  können  Sie 
leicht  in  eigene  Programme 
einbinden. 

Preis:  29,90  Kassette 
39,90  Diskette 


STATISTIC-STAR 

Eine  Grafik  sagt  mehr  als  1 0OO  Zahlen 

Ein  professionelles  Grafik-  und  Statistic- 
programm  zum  Auswerten  von  Daten  aller 
Art  (Schule,  Studium,  Beruf,  Hobby,  Haus¬ 
halt. ..). 

•  Linien-,  Balken-  und  Tortengrafik 

•  Betiteln  von  Grafiken 

•  400  Daten  direkt  im  Speicher 

•  Umfangreiche  Editierfunktionen 

•  Umfangreiche  statistische  Berechnungen 

•  Hardcopyfunktion  u.v  m. 

•  Preis:  59,90  Kassette 

79,90  Diskette 


Beispielgrafik  STATISTIC-STAR 


- - s 

MATHE-STAR 

DISKSORT-STAR 

Vom  Lehrer  für  Schüler! 

Leistungsstarke  Disketten- 

•  Lin.  Gleichungssysteme 

Verwaltung,  die  keinem 

•  Gleichungen  4.  Grades 

CPC-Benutzer  fehlen  sollte. 

•  Bruchrechnen 

DISKSORT-STAR  verwaltet, 

•  Primfaktorzerlegung 

archiviert,  katalogisiert. 

•  Polynome 

druckt...  Ihre  Disketten- 

•  Kurvendiskussion 

Sammlung  auf  einfachste 

•  Integralrechnung 

Weise.  Neben  der  reinen 

•  Vektorrechnung 

Diskettenverwaltung  ist  un- 

•  Matrixrechnung 
etc. 

Preis:  69,90  Kassette 
79,90  Diskette 

ter  anderem  noch  ein  kom¬ 
pletter  Diskettenmanager 
enthalten! 

Auch  in  punkto  Bedienung 
ist  DISKSORT-STAR  kaum 
zu  schlagen 

DM49,90 

N 

STAR-MON 

CREATOR-STAR 

Das  Entwicklungssystem 

Ein  Trickfilmdesigner  für  Ihren  CPC 

für  Profis  und  Anfänger 

und  alle  Hobbyregisseure! 

•  Assembler 

•  Sprite-Designer 

•  Editor 

•  Laufschrift 

•  Disassembler 

•  Utilities 

•  Monitor 

•  Kulissendesigner 

•  4  Breakpoints 

•  Sprites  mit  4  Unter- 

•  Trace-Funktion 

Positionen 

•  Bankswitch 

•  Verbinden  von  Sprites 

•  Memory  Dump 

•  Kulissen  auch  überein- 

•  Diskettenmonitor 

andergelegt 

•  u.v.m. 

•  Eigene  Programmier- 

Preis:  59,90  Kassette 
79,90  Diskette 

spräche  mit  Editor 
und  Compiler 

(erweiterte  Version) 

DM  49,90  Diskette 

JOYCE + JOYCE  PLUS  Software 


fÖes/e/- 
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DATEI  STAR  (464  /  664  /  61 28  /  JOYCE) 

Das  universelle  Dateiverwaltungsprogramm  im 
Direktzugriff! 


Einfache  Bedienung  durch  PULL-DOWN  Menues 
Frei  definierbare  Eingabemaske  mit  30  Datenfeldern 
1 400  Zeichen  pro  Datensatz! 

Frei  definierbare  Eingabe-,  Such-  und  Druckmaske 
Suchen  und  Selektieren  nach  allen  Feldern 
gleichzeitig 

Umfangreiche  Sortierfunktionen  und  Erstellung  einer 
Pointerdatei! 

Integrierte  Kalkulationsmöglichkeiten  (Rechenfelder) 

Schnittstelle  zu  STAR-WRITER  I 
(nur  CPC) 

Integrierter  Reportgenerator  u.  v.  m. 

Preis  98,—  DM 


Ur>Q 


STAR-MAIL 


(nur  für  JOYCE) 


Die  Schnittstelle  zur  Außenwelt 
für  alle  JOYCE-Benutzer! 


Automatische  Serienbrieferstellung  in  Verbindung  mit 
Locoscript  und  Datei-Star.  Alle  Daten  aus  DATEI-STAR 
können  beliebig  in  Locoscript-Texte  eingebaut  und 
verwendet  werden. 


Endlich  können  Locoscript-Texte  mit  fremden  Druckern, 
sogar  Typenradschreibmaschinen,  verarbeitet  wer¬ 
den.  Hierbei  ist  zu  beachten,  daß  original  Locoscript- 
Texte  mit  allen  Steuerzeichen  verwendet  werden,  und 
nicht  wie  bei  anderen  Programmen  umgewandelte 
ASCII-Dateien! 


Komplette  Unterstützung  der  Centronics-  &  RS  232 
Schnittstelle 


Jeder  Drucker  kann  mit  Hilfe  einer  einfachen  Anpas¬ 
sung  verwendet  werden! 

DATEI-STAR  &  STAR-MAIL  gibt  es  im  Paket  als 
JOYCE-MAILING-SYSTEM  für  nur  1 89,—  DM. 
Preis:  98,—  DM 


FIBU-STAR  Plus 

(Joyce,  6128  oder  664  und  464  mit  Speichererw  ) 

Endlich  gibt  es  eine  professionelle  Finanzbuchhal¬ 
tung  für  die  SCHNEIDER-Computer! 


•  Stammdatenverwaltung  und  Umsatzsteuervoranmel¬ 
dung 

•  Frei  wählbarer  Umsatzsteuerschlüssel  zur  automati¬ 
schen  Ermittlung  der  Steuerbeträge  und  deren  Ver¬ 
buchung  auf  den  Mehrwert-  und  Vorsteuerkonten 

•  Frei  wählbarer  Kontenrahmen  (bis  zu  400  Konten) 

•  Frei  wählbare  Zuordnung  der  Sach-  und  rechnenden 
Konten 

•  Buchungsjournal,  Kontenblätter  und  Jahresabschluß 

•  Summen-  und  Saldenlisten  der  Kreditoren,  Debitoren 
und  Sachkonten 

•  Einfaches  Erfassen  aller  Buchungsbelege  mit  oder 
ohne  Protokoll 

•  Buchungen  können  so  durchgeführt  werden,  wie  sie 
auf  den  Tisch  kommen,  da  alle  Buchungen  chronolo¬ 
gisch  und  innerhalb  eines  Datums  nach  Belegnum¬ 
mern  sortiert  werden 

•  Einfache  Bedienung  und  hohe  ABSICHERUNG  gegen 
Bedienungsfehler 

•  Preis  298,- DM 

Das  Programm  FIBU-STAR  Plus  ist  erstmals  unter  dem 

Namen  FIBU-M  1 980  installiert  worden  und  hat  sich  seit¬ 
dem  sehr  oft  in  der  Praxis  bewährt. 


STAR-BASE  ) 

STAR-BASE  ist  ein  anwenderfreundliches  Datenbank¬ 
system  mit  unglaublichen  Fähigkeiten! 

•  Eigener  Window-Manager 

•  Menueorientierte  Bedienung  und  Programmierung 

•  Volle  Unterstützung  des  JOYCE-Bildschirms 

•  Eingabemaske  über  9  Bildschirmseiten 

•  100  Datenfelder  pro  Eingabemaske 

•  88  Zeichen  pro  Datenfeld 

•  2060  Zeichen  pro  Datensatz 

•  Max  8  Zugriffsschlüssel 

•  Komplette  Indexverarbeitung 

•  Suchen  u.  Selektieren  nach  allen  Datenfeldern 

•  32767  Datensätze  pro  Datei 

•  Verknüpfung  von  mehreren  Dateien 

•  Zu  jedem  Datensatz  kann  eine  Unterdatei  mit  max.  255 
Zeichen  pro  Satz  angelegt  werden 

•  Kompletter  Reportgenerator 

•  Star-Base  arbeitet  voll  mit  Locoscript  zusammen 

•  Umfangreiche  Rechenfunktionen 

•  Serienbrieferstellung 

•  Integrierter  Texteditor 

•  Direkter,  menuegesteuerter  Datensatzzugriff 

•  Mehrspaltige  Formulare 

•  Eigener  Menuegenerator 

•  Einfachste  Maskendefinition 

•  Passwort  für  eine  Datei 

•  Ausführliches  Handbuch 

•  Preis:  1 98,—  DM  inkl.  Diskette  u.  Handbuch 
Weitere  Informationen  zu  STAR-BASE  und  zu  unseren  an¬ 
deren  JOYCE-Programmen  finden  Sie  in  unserem  neuen 
JOYCE-Katalog! 


Weitere  interessante  Programme  finden  Sie  in  unserem  ausführlichen  Katalog! 
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Vertrieb  für  die  Schweiz: 

1 ICS  Video-Computershop 
Schaffhauserstraße  473 

P  O  Box  103,  CH-8052  Zürich 
Telefon  01  /  3  02  26  00 

Händleranfrage 

erwünscht 

Software- Autoren 
gesucht 

□  Senden  Sie  mir  unverbindlich  Ihren  Katalog 

□  6128  D664  C464  □  JOYCE 

□  Hiermit  bestelle  ich  per  Vorkasse/ Nachnahme 

Name 

Vertrieb  für  Österreich: 

Ueberreuter-Media 

Alserstraße  24.  A-1091  Wien 
Telefon  481  5380 

Unsere  Produkte  sind 
in  allen  führenden 
Computer-Shops 
sowie  bei  Karstadt 
und  Brinkmann 
erhältlich! 

Wohnort 

Datum/Unterschrifl 

(Alle  Preise  verstehen  sich  als  unverbindliche 
,  Preisempfehlungen  zzg.  5  —  DM  Porto  und 

Verpackung)  CPC-D-786 

Nit  CurswUstrt^^sitijnieren,  dann  RETIIM. drücken. 


JOYCE  als  praktischer  Rechner: 

Tabellenkalkulation  Kalkül.O 

Neben  Textverarbeitung  und  Dateiverwaltung  ist  die  Tabel¬ 
lenkalkulation  ein  wichtiger  Anwendungsbereich  für  Mikro¬ 
computer.  Mit  einem  Tabellenkalkulationsprogramm  kön¬ 
nen  Sie  innerhalb  eines  nach  Zeilen  und  Spalten  gegliederten 
Zahlentableaus  die  Zellen  auf  vielfältige  Weise  miteinander 
verknüpfen.  Das  Praktische  dabei  ist,  daß  Sie  eine  Vielzahl 
von  Rechenoperationen  mit  unterschiedlichen  Werten  gleich¬ 
zeitig  durchführen  können. 

"Kalkül.O”  zeigt,  daß  es  ohne  großen  Programmieraufwand 
möglich  ist,  ein  Tabellenkalkulationsprogramm  in  Mallard- 
Basic  zu  schreiben.  Kommerzielle  Programme  mögen 
zwar  schneller  und  flexibler  sein  als  Kalkül.O,  dafür  dürfte 
ihre  Programmstruktur  für  den  nichtprofessionellen  Pro¬ 
grammierer  nur  schwer  erkennbar  und  (auch  aus  urheber¬ 
rechtlichen  Gründen)  kaum  veränderbar  sein. 

Kalkül.O  ist  demgegenüber  bewußt  einfach  und  übersicht¬ 
lich  gehalten,  um  das  Verständnis  der  Programmstruktur 
zu  erleichtern.  So  ist  es  mit  geringer  Mühe  möglich,  das 
Programm  Ihren  persönlichen  Verwendungszwecken  an- 
zupassep,  sofern  die  Verwendungsbreite  des  Grund¬ 
programms  für  Ihre  speziellen  Bedürfnisse  noch  nicht 
ausreichen  sollte. 


So  funktioniert  Kalkül.O 


Nach  dem  Laden  von  Basic  und  Starten  des  Programmes 
(RUN  "KalkülO”)  erscheint  eine  aus  8  Spalten  und  20  Zei¬ 
len  bestehende  Zahlentabelle.  In  jedem  der  insgesamt  160 
Felder  dieser  Tabelle  sehen  Sie  zu  Anfang  die  Angabe  0.  In 
diese  Felder  können  Sie  später  Zahlen  eingeben,  die  -  falls 
Sie  nicht  eine  andere  Dezimalpunktposition  wählen  -  auf 
ganze  Zahlen  gerundet  werden  (größte  Zahl:  9999999). 
Spalten  und  Zeilen  sind  zwar  durchnumeriert,  benötigt 
werden  diese  Koordinaten  jedoch  nicht.  Die  einzelnen 
Operanten  für  die  durchzuführenden  Operationen  (Fel¬ 
der,  Spalten  oder  Zeilen)  werden  mit  Hilfe  des  Cursors 
(invers  dargestelltes  Feld)  ausgewählt.  Am  Kopf  jeder 
Spalte  sowie  am  Anfang  jeder  Zeile  sehen  Sie  zunächst  ein 
leeres  Feld.  In  dieses  Feld  können  Sie  beliebige  Bezeich¬ 
nungen  eintragen,  die  -  ebenso  wie  alle  späteren  Zustände 
der  Zahlentabelle  -  ausgedruckt  werden  können. 

Unter  der  Tabelle  sehen  Sie  jeweils,  welche  Entschei- 
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dungsmöglichkeiten  Ihnen  der  nächste  Programmschritt 
bietet  Um  einen  Menuepunkt  zu  aktivieren,  ist  jeweils  der 
vor  dem  ”)”-Zeichen  stehende  Buchstabe  bzw.  die  den  Zei¬ 
chen  "=>  ”  folgende  Ziffer  zu  drücken.Dabei  können  Sie 
beliebig  zwischen  den  verschiedenen  Programmteilen 
wechseln,  um  die  benötigten  Zahlen  einzugeben  (Ein¬ 
gabe)  und  mit  ihnen  zu  rechnen  (Kalkulation).  Besondere 
Symbole  etc.  brauchen  Sie  dabei  nicht.  Die  Kenntnis  der 
deutschen  Bezeichnungen  der  grundlegenden  Rechen¬ 
operationen  reicht  aus.  Was  die  gewählten  Entschei¬ 
dungsoptionen  (z.B.  zeilenweise  oder  spaltenweise)  be¬ 
deuten,  wird  Ihnen  schnell  klar  werden,  wenn  Sie  ein  paar 
Proberechnungen  durchführen. 

Die  Vielzahl  der  möglichen  Rechenoperationen  läßt  sich 
nur  in  ihrer  gedanklichen  Grundstruktur  beschreiben. 
Nachdem  Sie  bei  der  Hauptauswahl  für  Kalkulation  op¬ 
tiert  haben,  stehen  Ihnen  folgende  Rechenmöglichkeiten 
zur  Verfügung: 


Zeilenweise  oder  spaltenweise  Kalkulation 


-  Einzeilen-  bzw.  Einspaltenoperation  (Addition,  Subtrak¬ 
tion,  Multiplikation,  Division,  Potenzen,  Zeilen-/Spalten- 
summen) 

Hier  können  Sie  jeweils  alle  Felder  einer  bestimmten  Zeile 
mit  einem  neu  einzugebenden  Wert  in  der  angegebenen 
Weise  verknüpfen  und  das  Ergebnis  in  einer  beliebigen 
Zeile  ablegen.  Außerdem  können  Sie  die  ersten  Elemente 
einer  Zeile  aufaddieren  und  das  Ergebnis  in  das  letzte  Feld 
der  gewählten  Zeile  ablegen. 

Wenn  Sie  eine  der  Operationen  ausgewählt  haben,  er¬ 
scheint  am  unteren  Bildrand  der  Text  ”Zeile  für  Ope¬ 
ration”.  Nun  fahren  Sie  mit  dem  Cursor  in  ein  beliebiges 
Feld  innerhalb  der  gewünschten  Zeile  und  markieren 
diese  durch  Betätigen  der  RETURN-Taste.  Jetzt  fragt  das 
Programm  den  mit  der  Zeile  zu  verknüpfenden  Wert  ab. 
Schließlich  markieren  Sie  noch  auf  die  eben  beschriebene 
Weise  die  "Ergebnisspalte”,  d.h.  in  welchen  Feldern  das 
Ergebnis  abgelegt  werden  soll.  Die  Spaltenoperationen 
verlaufen  analog. 

-  Zweizeilen-  bzw.  Zweispaltenoperation  (Addition,  Sub¬ 
traktion,  Multiplikation,  Division,  Prozentrechnung): 
Hier  wird  jedes  Element  einer  Zeile  mit  dem  entsprechen¬ 
den  Element  der  anderen  gewählten  Zeile  in  der  angegebe¬ 
nen  Weise  verknüpft.  Die  Auswahl  der  gewünschten  Zei¬ 
len  geschieht  wie  oben  beschrieben.  Jedoch  werden  Sie 
hier  zweimal  zur  Markierung  einer  "Zeile  für  Operation” 
aufgefordert.  Die  Spaltenoperationen  verlaufen  wieder 
analog. 

-  Summe  aller  Zeilen  bzw.  Spalten: 

Bei  dieser  Operation  werden  die  ersten  Elemente  der 
Zeilen/Spalten  aufaddiert  und  die  jeweiligen  Ergebnisse 
in  die  letzten  Felder  der  Zeilen/Spalten  abgelegt. 


Feldweise  Kalkulation 


-  Einzelfelder  mit  anderen  Feldern  verknüpfen 

(Addition,  Subtraktion,  Multiplikation,  Division,  Prozent¬ 
rechnung) 

-  Einzelfelder  mh  neueingegebenen  Zahlenwerten  verknüpfen 

(Addition,  Subtraktion,  Multiplikation,  Division,  Potenz) 


1 1 1  •  a  1 1 1 1 1 1 1  •  •  i 


. Joyce . 


Die  Auswahl  der  einzelnen  Felder  geschieht  ebenfalls  fr 

nach  der  oben  beschriebenen  Methode.  Umstellung  auf  andere  Tabellenformate 


Für  den  Fall,  daß  Sie  jetzt  das  Wurzelziehen  vermissen 
sollten,  sei  daraufhingewiesen,  daß  man  durch  das  Poten¬ 
zieren  einer  Zahl  mit  einer  zwischen  0  und  1  liegenden 
Zahl  beliebige  Wurzeln  ziehen  kann.  Die  Quadratwurzel 
erhält  man  z.B.  dadurch,  daß  man  eine  Zahl  mitö.5  poten¬ 
ziert. 

Nach  jeder  Rechenoperation  können  Sie  wieder  eine  der 
im  aktuellen  Menue  angebotenen  Operationen  aufrufen 
oder  dieses  Verlassen  und  in  ein  beliebiges  anderes  Menue 
wechseln. 

Jedes  Tabellenbild  können  Sie  ausdrucken  lassen,  ohne 
dadurch  am  Weiterrechnen  gehindert  zu  sein.  So  können 
Sie  also  den  Entstehungsprozeß  Ihrer  Rechnung  in  Ein¬ 
zelschritten  festhalten.  Die  Tabellenbreite  ist  so  einge¬ 
stellt,  daß  eine  Tabelle  auf  einer  halben  DIN  A4-Seite  Platz 
hat.  Das  Blatt  sollte  dabei  etwa  in  der  Mitte  des  Druckers 
eingespannt  werden.  Mit  Hilfe  des  Druckerbedienungs¬ 
modus  (PTR-Taste)  können  Sie  zwischen  dem  Ausdruck 
in  Entwurfs-  oder  Korrespondenzschrift  wählen. 


Der  logische  Aufbau  von  Kalkül.O 


Das  Verständnis  des  Aufbaus  von  Kalkül.O  wird  erleich¬ 
tert,  wenn  man  das  Programm  gedanklich  in  drei  Teile 
untergliedert:  Dem  kleinen  Initialisierungsteil  (Zeilen  10- 
180)  folgt  ein  größerer  Auswahlteil  (Zeilen  200  -  1940),  in 
dem  auch  die  Routinen  für  die  Ein-/Ausgaben  enthalten 
sind.  Den  Abschluß  bildet  der  Routinenteil  (Zeilen  1960  - 
7240)  für  die  Rechenoperationen. 

Im  Initialisierungsteil  ist  insbesondere  die  Festlegung  der 
Dimensionen  der  Rechentabelle  in  Zeile  60  zu  beachten, 
die  durch  die  drei  Konstanten  maxcol,  maxrow  und  col¬ 
width  bestimmt  wird.  Die  Konstante  nachkomma  bestimmt 
die  anfängliche  Anzahl  der  Nachkommastellen.  Die  Zei¬ 
len  70-  180  enthalten  Festlegungen  für  die  Steuersequen¬ 
zen  des  Bildschirms  sowie  der  Tabellengestaltung. 

Der  Auswahlteil  (Zeilen  200  -  1940)  enthält  die  Menues 
und  die  Eingaberoutinen,  über  die  Sie  mittels  einfachem 
Tastendruck  die  zahlreichen  Funktionen  steuern  können. 
Unter  dem  Punkt  Eingabe  können  Zeilen  sowie  Spalten 
beschriftet  bzw.  Werte  in  bestimmte  Felder  eingetragen 
werden. 

Über  die  "Dezimalpunktwahl”  (Zeilen  910  -  990)  werden 
die  Felder  der  Tabelle  den  gewünschten  Dezimalstellen 
angepaßt.  Änderung  der  Dezimalpunktposition  ist  auch 
nach  Eingabe  von  Zahlen  möglich.  Wird  dabei  der  Werte¬ 
bereich  unter-/überschritten,  so  setzt  Kalkül.O  in  das  be¬ 
troffene  Feld  den  neuen  Grenzwert  ein.  Dies  geschieht 
auch,  wenn  bei  Operationen  der  Bereich  verlassen  wird. 
Die  "Kalkulationswahl”  (Zeilen  1270  -  1940)  dürfte  sich 
durch  die  Überschriften  weitgehend  selbst  erklären.  Stets 
sind  die  Auswahlverzweigungen  zusammen  mit  der 
Routine  "Taste”  (Zeilen  7000  -  7050)  zu  sehen,  die  oft  für 
unterschiedliche  Zwecke  benötigt  wird. 

Im  Routinenteil  (Zeilen  1960  -  7100)  finden  Sie  die  Routi¬ 
nen  "Tabelle  zeigen”  (Zeilen  2400  -  2430)  und  "Tabelle 
drucken”  (Zeilen  2450  -  2500).  Die  anschließenden  "Kal¬ 
kulationsroutinen"  (Zeilen  2520  -  6890)  machen  den  größ¬ 
ten  Teil  des  Programms  aus.  Ihre  Funktion  dürfte  aus  den 
Kommentaren  hinlänglich  klar  werden. 


Jedes  Tabellenformat  hat  Vor-  und  Nachteile.  Je  größer  die 
Zahl  der  Spalten  ist,  desto  schmaler  werden  die  Spalten 
und  desto  kleiner  werden  die  Zahlen,  mit  denen  in  der  Ta¬ 
belle  gerechnet  werden  kann.  Für  unterschiedliche  Ver¬ 
wendungszwecke  können  infolgedessen  verschiedene  Ta¬ 
bellenformate  angebracht  sein.  Programme  für  unter¬ 
schiedliche  Tabellenformate  kann  man  ohne  großen  Auf¬ 
wand  aus  dem  Grundprogramm  Kalkül.O  entwickeln. 
Dazu  brauchen  Sie  nur  die  schon  erwähnten  drei  Kon¬ 
stanten,  die  die  Tabellendimensionen  bestimmen,  in  Zeile 
60  zu  ändern.  Die  Konstante  colwidth  bestimmt  die  Breite 
eines  Feldes,  d.h.  die  Anzahl  der  Dezimalstellen  ein¬ 
schließlich  Vorzeichen  und  Dezimalpunkt.  Die  Kon¬ 
stante  maxcol  gibt  die  Anzahl  der  Spalten  wieder  (max. 
Spaltenanzahl  =  int(87/(colwidth+l))-l).  maxrow  be¬ 
stimmt  die  Anzahl  der  Zeilen  der  Tabelle.  Dabei  ist 
zu  beachten,  daß  bei  mehr  als  20  Zeilen  die  Bildschirm¬ 
darstellung  hoffnungslos  durcheinander  gerät. 

Durch  Änderung  der  Konstanten  nachkomma  in  Zeile  60 
können  Sie  auch  gleich  zu  Beginn  des  Programmes  eine 
gewünschte  Anzahl  von  Nachkomma  stellen  festlegen. 

(Dr.  Jürgen  Fiedler) 

Anmerkung  der  Redaktion:  Was  man  noch  tun  könnte... 

Dem  engagierten  Leser  dürfte  es  sicher  nicht  schwer  fal¬ 
len,  noch  weitere  Features  in  das  Programm  einzubauen. 
So  könnte  man  z.B.  das  Programm  noch  um  Funktionen 
zum  Speichern  und  Laden  von  aktuellen  Rechenblättem 
oder  zur  flexibleren  Tabellengestaltung  usw.  erweitern. 
Falls  dabei  brauchbare  Ergebnisse  erzielt  werden,  würden 
wir  uns  über  entsprechende  Einsendungen  freuen.  (MC) 

10  1  save  "KalkiilO" 

20  : 

30  ' Tabellenkalkulatian  für  Schneider  JOYCE  PCV 
40  'COPYRIGHT:  Dr.  Jürgen  Fiedler,  Bonn 
50  : 

60  CLEAR: maxcol=8: maxrow=20 : calwidth=8 : nachkomma=0 
: DIM  f (maxcol , maxrow) , sS (maxcol) , z$ (maxrow) 

65  ON  ERROR  GOTO  7200 

';h  escS=CHR$  (27) :  cls$=esc$+" E"  +esc$+" H"  :  crlfS=CHR$ 
<13>+CHRS (10)  :  invon4=escS+'1  p“  :  invof  f  $=esc$+" q"  :  crs 
on$=escS+"e" : crsof f $=escS+” f H : beep$=CHR$ (7) : backsp 
ace$=CHRS(8)+"  "+CHRS(8> 

75  DEF  FNtaS (tiS  >  =STRINGS ( (82 -LEN <t iS ) > /2 , " " 
+-ti$+"  "+STRINGS  (  (82-LEN (tiS)  )  /2,  "="  ) 

80  DEF  FNkS  (t iS) =clsS+STRING$  (  (85-LEN  <tl$>>/2,"=H) 
+"  "+tiS+"  ”  +STRINGS  (  (85-LEN (t iS >> /2 ,**=")  :  DEF  FNbp 
osS=esc$+" Y" +CHRS (36+row) +CHRS (35+col* (col width+1 ) 
) 

65  DEF  FNposS=escS+" Y" +CHRS (32+ypos) +CHR$ (32+xpos) 

: wüS=esc4+" XM  +CHRS  <32 ) +CHRS (32  >  +CHR$  <63 ) +CHRS  (121) 

: wlS=esc$ +" X" +CHRS (59 ) +CHRS  <32 ) +CHRS (36 ) +CHRS (121) 
90  ti$="  Tabellenkalkulation  Kalkül  " 

100  uS="  " +CHRS  <149 ) : vS=STRINGS  <2 , 154  >  +CHRS  <159  > : 
FOR  i=0  TO  maxcol :tmpS=MIDS(STR$(i>, 2)  :  l=LEN(tmp$> 

: j  =  INT ( (colwidth-1 > /2>  :  uS=u$+SPACES (j > +tmp$+SPAC£S 
(colwidth-  <j+l>  >+CHRS  (149)  :  v$=vS+STRINGS  (colwidth, 
154 ) +CHRS ( 155  > : NEXT 
110  : 

120  wS=" +"+STRINGS (col width-1 " 

130  mz=VAL  (STRINGS  (colwidth-1 ,  "9''  )+"  !  "  > 

160  za$="max.  Zahl:  +/-" +STRS <mz> 

180  FOR  y=0  TO  maxrow: zS <y) =SPACES (colwidth) :  NEXT: 
FOR  x=l  TO  maxcol : SS (X)=SPACE$ (colwidth)  :  NEXT 
190  : 

200  '  AUSWAHL 

210  PRINT  wOS; ersoff S; clsS: GOSUB  2400 : row=0 : col=0 
220  minrow=l :  mincol=  1 :  prS='"'  :  GOSUB  460:PRINT  wlS;c 
lsS ; 

230  PRINT  "HAUPTVAHL:  E)ingabe  Kalkulation  D)ez 
1 mal punkt wähl  Druck=>4  Ende=>5" 

240  rS="EKD45" : GOSUB  7000 

250  ON  ziff  GOSUB  280,1270,910,2450,7070 

260  GOTO  220 
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'Joyce . 

270  : 

280  'EINGABE 

290  pr*=" "  :  mincol=0 : minrow=0 :  GOSUB  500: IF  t=27  THE 
N  RETURN 

300  PRINT  wl* ; cls* ; : IF  cal  =  0  THEN  PRINT" Titel  Zell 
e" ; STR* (row) " :  GOSUB  820: IF  t=2?  GOTO  290  ELSE 

z* (row) =tmp* : GOTO  290 

310  IF  row=0  THEN  PRINT"Ti tel  Spalte"  ;  STR*  <col  >;"  : 

" ; : GOSUB  820: IF  t=2?  GOTO  290  ELSE  s* <col )=tmp*: G 
OTO  290 

320  PRINT  za* : PR INT" Wert  Feld"  ;  STR* (row) MID* ( 
STR*  (col >  ,  2 )  ;  "  :  GOSUB  820:  IF  t=27  GOTO  290  ELSE 

f <col,  row>= VAL <t mp* >: GOSUB  600: GOSUB  800: GOTO  290 
330  'Cursor  in  Tabelle  positionieren: 

340  PRINT  wl*; cls*:  PRINT,  "Mit  Cursortasten  positio 
nieren,  dann  RETURN  drücken. " : PRINT, , "EXIT  ->  Zurü 
ck": PRINT  invon*; pr*; invof f * 

350  PRINT  w0*; ersoff* 

360  PRINT  invon*; 

370  GOSUB  800 

380  t*= INKEY*: VH ILE  t*=" ": t*= INKEY* : WEND:  t=ASC <t* ) 

: PRINT  invoff*; : GOSUB  800 

390  LF  t=6-THEN  IF-  coKnaxcol  -THEN  col=col  +  l 

400  IF  t=l  THEN  IF  col>mincol  THEN  col=col-l 

410  IF  t=30  THEN  IF  rowCmaxrow  THEN  row=row+l 

420  IF  t=31  THEN  IF  row>minrow  THEN  rovFrow-1 

430  IF  t=27  OR  t=13  THEN  PRINT  erson* ; wl* ; cls* ; : RE 

TURN 

440  GOTO  360 
450  'Modusausgabe: 

460  xpos=0: ypos=l : PRINT  wO* ; FNpos* ; invon* ; pr* j invo 
f f * ; SPC  <65-LEN <pr* >  > : RETURN 

500  'Cursor  in  Tabelle  stellen  und  Steuerung  aufru 
f  en: 

510  IF  col<mincol  THEN  col=xnincol  ELSE  IF  col>maxc 
ol  THEN  col=maxcol 

520  IF  rawCminrow  THEN  row=minrow  ELSE  IF  row>maxr 
ow  THEN  rovFinaxrow 
530  GOTO  340 

540  ' Eingabe  Ergebnisfeld: 

550  pr*="Ergebnisf eld" : GOTO  500 
560  'Eingabe  Feld  für  Operation: 

570  pr*="Feld  für  Operation" : GOTO  500 

600  ' Wert  des  Feldes  darf  max. Zahl  nicht  überschre 

iten: 

610  1  =  0:  IF  f  (col ,  row)  <-mz  THEN  f  (col ,  row)  =-m?: :  1  =  1 
620  IF  f <col , row) >mz  THEN  f <col , row)=mz:  1  =  1 
630  IF  1  THEN  PRINT  wl*; cls*; "WARNUNG:  Wertebereic 
h  über-/unterschri tten  ! " ; beep* 

640  PRINT  w0*; 

650  RETURN 

660  'Eingabe  Ergebnisspalte: 

670  pr*=" Ergebnisspalte" : GOTO  500 
680  'Eingabe  Spalte  für  Operation: 

690  pr*="Spalte  für  Operation" : GOTO  500 

700  ‘Eingabe  einer  Zahl  für  Rechenoperationen: 

710  PRINT  wl* ; cls* ; "  Zahl:  GOSUB  820: IF  t<>27  T 

HEN  z=VAL(tmp*> : IF  z<-mz  OR  z>mz  THEN  PRINT  za*:GO 
TO  710 
720  RETURN 

730  'Eingabe  Ergebniszeile: 

740  pr*=" Ergebniszeile" : GOTO  500 
760  'Eingabe  Zeile  für  Operation: 

770  pr*="Zeile  für  Operation" : GOTO  500 
790  ' Ausgabe  eines  Feldes: 

800  PRINT  w0*; FNbpos*; : IF  col=0  THEN  PRINT  zl(row) 
ELSE  IF  rovpO  THEN  PRINT  sS (col)  ELSE  PRINT  USING 
w$ ; f (col , row) 

810  RETURN 

815  'Eingabe  eines  Feldes: 

820  PRINT  erson*; : tmp*=”H 

830  l=LEN(tmp* > : t*= INKEY* : WHILE  t*=" ":  t*  =  INKEY* : WE 
ND: t=ASC<t*) : IF  t=13  OR  t=27  GOTO  870 
840  IF  t=127  AND  1>0  THEN  PRINT  backspace* ; : tmp*=L 
EFT* (tmp*, 1-1) : GOTO  830 

850  IF  t*>="  "  AND  t*<=“ ß"  AND  lCcolwidth  THEN  PRI 
NT  t*; : tmp*=tmp*+t* : GOTO  830 
860  PRINT  beep* ; : GOTO  830 

870  IF  lCcolwidth  THEN  tmp*=tmp*+SPACE*  <col width-1 

) 

880  PRINT  ersoff*; : RETURN 
890  : 

900  : 

910  'DEZIMALPUNKTPOSITION 
920  : 

930  PRINT  wl*; cls*; "Wieviel  Nachkommastellen  ?" ; : G 
OSUB  820 

940  1=VAL  <tmp* ) : IF  l>colwidth-2  OR  1<0  THEN  PRINT 
beep*; : GOTO  930 
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950  w*=" +" + STR ING* <colwidth-l-l+ CI* <1>0) )  ,  ) : IF 

1>0  THEN  w*=w*+“ ,"+STRING*(l,"#") 

960  w*=w*+"  " : mz=VAL (STRING*  Ccolwidth-l-l+  <1*  C1>0> 
) , " 9" ) +" . " +STRING* <1 , "9" >+" t " ) 

970  za*="max.  Zahl:  +/-  "+-STR*  (mz)  :  nachkomma=l 
980  FOR  col=l  TO  maxeol :  FOR  row=l  TO  maxrow: f (col , 
row) =RQUND (f (col , row)  ,  nachkomma ): GOSUB  600: GOSUB  8 
00: NEXT: NEXT 
990  RETURN 
1260  : 

1270  'KALKULATION 
1280  pr*="": GOSUB  450 
1290  PRINT  wl* ; cls* ; 

1300  PR  INT"  KALKULATION:  zeilenweise  s)palte 

nweise  f)eldweise" 

1310  PRINT"  Druck=> 

4  Zurück=>5" 

1320  r*="ZSF45'*  :  GOSUB  7000 

1330  IF  zif f =5  THEN  RETURN  ELSE  ON  ziff  GOSUB  1360 
,1610, 1860,2450 
1340  GOTO  1280 
1350  : 

1360  ' -ZEILENKALKULATION- 
1370  pr*="ZEILEN: ": GOSUB  450 
1380  PRINT  wl* ; cls* ; 

1390  PR INT" ZEILENKALKÜL:  E) Inzeilenoperation  Z)w 
eizei lenoperation  S)umme  aller  Zeilen 

Druck=>4 


Zurück=>5“ 

1400  r*="EZS45" : GOSUB  7000 

1410  IF  ziff =5  THEN  RETURN  ELSE  ON  ziff  GOSUB  1440 
, 1530,3800,2450 
1420  GOTO  1370 
1430  : 

1440  'Einzeilenoperationen 
1450  pr$=" EINZEILEN: ": GOSUB  450 
1460  PRINT  wl* ; cls* ; 

1470  PR I NT" E I NZE I LENOPERAT IONEN :  A)ddition  S)ubtr 


aktion  Multiplikation  D)ivision  P)otenzen" 
1480  PRINT"  Z)eilensuxnme 

Druck=>4  Zurück=>5" 


1490  r*="ASMDPZ45" : GOSUB  7000 

1500  IF  ziff =8  THEN  RETURN  ELSE  ON  ziff  GOSUB  2580 
, 2680,2780,2880,2970,3070,2450 
1510  GOTO  1450 
1520  : 

1530  'Zweizellenoperationen 
1540  pr*  =  " ZWEIZEILEN:  GOSUB  450 
1550  PRINT  wl* ; cls* ; 

1560  PRINT" ZWEI  ZEILEN:  Alddition  S)ubtraktion  M 
>ultiplikation  D)ivision  P)rozent 


Druck=>4  Zurück=>5" 

1570  r*="ASNDP45" : GOSUB  7000 

1580  IF  zif f =7  THEN  RETURN  ELSE  ON  ziff  GOSUB  3200 
, 3310,3420,3530,3670,2450 
1590  GOTO  1540 
1600  : 

1610  ' -SPALTENKALKULATION- 
1620  pr*=" SPALTEN: " : GOSUB  450 
1630  PRINT  wl* ; cls* ; 

1640  PR INT" SPALTENKALKÜL:  Elinspaltenoperation  Z) 
weispaltenoperation  S)umme  aller  Spalten 

Druck=>4 


Zurück=>5" 

1650  r*=" EZS45" : GOSUB  7000 

1660  IF  ziff =5  THEN  RETURN  ELSE  ON  ziff  GOSUB  1690 
, 1780,5120,2450 
1670  GOTO  1620 
1680  : 

1690  'Einspaltenoperationen 

1700  pr*=” EINZELSPALTEN: ": GOSUB  450 

1710  PRINT  wl* ; cls* ; 

1720  PR INT" EINSPALTENOPERATION:  A)ddition  S)ubtra 
ktion  Multiplikation  D)ivision  P)otenzen" 

1730  PRINT"  X) Spaltensumme 

Druck=  >  4  Zurück=>5" 


1740  r*= - ASMDPX45"  :  GOSUB-  7000 

1750  IF  zif f =8  THEN  RETURN  ELSE  ON  ziff  GOSUB  3900 
, 4000, 4100,4200,4290,4390,2450 
1760  GOTO  1700 
1770  : 

1780  * Zweispaltenoperationen 
1790  pr*=" ZWEISPALTEN: " : GOSUB  450 
1800  PRINT  wl* ; cls* ; 

1810  PRINT"ZWEI  SPALTEN:  A)dditian  S)ubtraktion 
Multiplikation  D)ivision  P)rozent 


Druck=>4  Zurück=>5" 
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1820  rS=" ASMDP45" : GOSUB  7000 

1830  IF  zif f =7  THEN  RETURN  ELSE  OH  ziff  GOSUB  4520 
, 4630, 4740, 4850,4990,2450 
1840  GOTO  1790 
1850  : 

1860  ' -EINZELFELDKALKULATION- 
1870  pr$=" FELDER: " : GOSUB  450 
1880  PRINT  wl$;cls$; 

1890  PRINT” EINZELFELDER :  AJddition  Slubtraktion 
Multiplikation  Dllvision  P)razent” 

1900  PRINT"  mit  Eingabe:  +  Addition  -  Subtraktion 
*  Multiplikation  /  Division  ‘  Potenz" 

1910  PRINT" 

Druck=>4  Zurück=>5" 

1920  rS=”ASMDP+-*/ •'45"  :  GOSUB  7000 

1930  IF  zif f =12  THEN  RETURN  ELSE  ON  ziff  GOSUB  520 
0,5390,5580,5770,5970, 6140,6310,6480,6650,6830,245 
0 

1940  GOTO  1870 
2400  'Tabelle  zeigen 

2410  PRINT  w0$;  : cx=0:  cy=0:  PRINT  FNposS; 

2420  PRINT  FHk$ <ti$) : PRINT  TAB<69>">  Dr . J . Fiedler , 
Bonn": PRINT  uS: PRINT  v$: PRINT  "  0" ; CHR$ <149> ; zS <0> 

;  : FOR  x=l  TO  maxcol :  PRINT  "  s$ <x> ;: NEXT: PRINT 
2430  xpos=0:FOR  row=l  TO  maxrow: ypos=4+row:  PRINT  F 
Npos$ ; : PRINT  USING  row; : PRINT  CHR$ < 149 > ; z$ (ro 

w)  ;  ”  :  "  ;  :  FOR  col  =  l  TO  maxcol : GOSUB  600: GOSUB  800: N 
EXT: PRINT: HEXT:  RETURN 
2440  : 

2450  'Tabelle  drucken 

2460  LPRINT  CHR$  <27 > ; "M" ; LPRINT: LPRINT:  LPRINT  FNta 
S<ti$> : LPRINT 

2470  LPRINT"  ! " ; : FOR  i=0  TO  maxcol : tmp$=MID® <STR$ 
Ci ) , 2) : 1=LEN Ctmp® ) : J  = INT < (col width-1 > /2 > : LPRINT  SP 
CCj  )  ;  t mp$ ;  SPC Ccol width-  Cj+1)  );"!'•  j  :  NEXT:  LPRINT 
2480  LPRINT” — +" ; : FOR  i=0  TO  maxcol : LPRI NT  STRING* 
Ccol width, NEXT:  LPRINT 

2490  LPRINT  "  0: " ; z$ C0> ;  : FOR  x=l  TO  maxcol :  LPRINT 
"  " ; s$ Cx) ;: NEXT: LPRINT 

2500  FOR  y=l  TO  maxrow: LPRINT  USING  y; : LPRIN 

T  z* Cy) FOR  x=l  TO  maxcol : LPRINT  USING  w$;fCx 
, y) ;  : NEXT: LPRINT: NEXT: LPRINT  CHRS  C27) ; "P" : RETURN 
2510  : 

2520  '***  KALKULATIONSROUTINEN  *** 

2530  : 

2540  '*  ZEILENKALKÜL  * 

2550  : 

2560  ' -Einzeilenoperationen- 
2570  : 

2580  'Addition  neuer  Zahl 
2590  : 

2600  flg=0: pr*=pr*+" ADDITION" 

2610  GOSUB  450 

2620  GOSUB  770 : yl=row: IF  t=27  GOTO  2660 
2630  GOSUB  700: IF  flg  THEN  z=-z 
2640  GOSUB  740: IF  t=27  GOTO  2660 

2650  FOR  col=l  TO  maxcol : f Ccol , row) =ROUND Cf Ccol , yl 
) +z , nachkomma ): GOSUB  600: GOSUB  800: NEXT 
2660  RETURN 
2670  : 

2680  'Subtraktion  neuer  Zahl 
2690  : 

2700  flg=l 

2710  prS=pr*+" SUBTRAKT ION" : GOSUB  450 
2720  GOTO  2620 
2770  : 

2780  'Multiplikation  neuer  Zahl 
2790  .• 

2800  flg=0 

2810  pr*=pr*+" MULTIPLIKATION" : GOSUB  450 
2820  GOSUB  770 : yl=row: IF  t=27  GOTO  2860 
2830  GOSUB  700: IF  flg  THEN  IF  z<>0  THEN  z=l/z 
2840  GOSUB  740: IF  t=27  GOTO  2860 

2850  FOR  co 1  =  1  TO  maxcol : f Ccol , row)=ROUNDCf Ccol ,  yl 
> »z , nachkomma ): GOSUB  600: GOSUB  800: NEXT 
2860  RETURN 
2870  : 

2880  'Division  neuer  Zahl 
2890  : 

2900  flg=l 

2910  pr*=pr$+"DIVISION" : GOSUB  450 
2920  GOTO  2820 
2960  : 

2970  'Potenzieren  mit  neuer  Zahl 
2980  : 

2990  pr$=pr*+" POTENZEN" 

3000  GOSUB  450 

3010  GOSUB  770: yl=row: IF  t=27  GOTO  3050 
3020  GOSUB  700 


"BYTE  FT1E"  CDmPUTERSYSTEfTlE 

WILHELMSTRASSE  7 
5240  BETZDORF 
TEL.:  02741/23537  &  23107 

VON  PROFIS  ERSTELLTE  SOFTWARE 
ZU  EINEM  MARKTORIENTIERTEN  PREIS 

AUFTHA6SBEARBEITUN6  BM  5.0/T  für  JOVCE  u.  CPC  6128  wahlweise  mit  einem  oder  2 
Laufwerken. 

Das  Programm  verwaltet  Firmen  -  Kunden  -  Artikel  u.  Lieferantenstamm. 
Ausgedruckt  werden:  Angebot  -  Auftragsbestätigung  -  Lieferschein  -  Rechnung  - 
Proformarechnung  -  Wareneingang  -  Gutschrift  u.  Bestellung. 

Umsatz  u.  Rohgewinnstatistiken  über  Kunden  -  Lieferanten  -  u.  Artikel,  Lagerbestands¬ 
liste,  Bestellvorschläge. 

Kunden  -  Lieferanten  -  Artikel  -  Preis  und  Inventurlisten. 

Der  Speicherplatz  wird  dynamisch  verwaltet,  d.h.  aut  einer  178  KB-Diskette  können 
300  Kunden/Lieferanten  u.  1 300  Artikel  bearbeitet  werden.  Für  jeden  Stamm  kann  auch 
eine  separate  Diskette  angelegt  werden 

Beim  J0YCE+  werden  1000  Kunden/Lieferanten  u.  5000  Artikel  verwaltet. 

3"-Diskette  mit  Handbuch  448,00  DM 

FIBU  BM  1.0/T  für  JOYCE/6128/664  u.  464  wahlweise  mit  einem  oder  2  Laufwerken. 
150  Konten  -  bis  5-stellige  Kontonr.  -  Kontenrahmen  frei  wählbar  - 1750  Buchungen  pro 
Monat  -  8  Steuerschlüssel  mit  2  Nachkommastellen  definierbar  -  Druckeranpassung. 
Druckariusgahan:  Konten  einzeln  (auch  Bildschirm)  -  Konten  alle  bei  MonatsabschiuB  - 
Kontenplan  -  Umsatzsteuervoranmeldung  (auch  am  Bildschirm)  -  Buchungsjournal  - 
Saldenliste  -  Monats-  und  Jahresabschluß  mit  Saldenvortrag  (Eröffnungsbilanz)  -  BWA 

3”-Diskette  mit  Handbuch  300.00  DM 

VEREINSVERWALTUN6  für  CPC  664,  6128  u.  JOYCE  m.  einem  oder  2  Laufwerken. 
Verwaltung  von  750  Mitgliedern  mit  1  Laufwerk  - 1 500  Mitgliedern  mit  2  Laufwerken  - 
mehrere  Sortiermöglichkeiten  -  Infozeilen  -  Serienbrieferstellung  -  Adressaufkleberdruck 

-  Druck  von  Bankeinzugsformularen  und  Überweisungsträgem  -  Einnahme  und  Aus¬ 
gaberechnung  max.  60  Konten. 

3"-Diskette  mit  Handbuch  241.00  DM 

ADRESSVERWALTUNG  für  CPC  664,  6128  u.  Joyce  m.  einem  oder  2  Laufwerken. 
Verwaltung  von  1 1 00  Adressen  mit  einem  Laufwerk  -  2000  Adressen  mit  2  Laufwerken 

-  mehrere  Sortiermöglichkeiten  -  Infozeilen  -  Serienbrief  -  Adressaufkleberdruck. 

3"-Diskette  mit  Handbuch  120.00  DM 

Alle  Programme  sind  in  TU  RBO-PASCAL  geschrieben. 

Demoversionen  für  FIBU;  AUFTRAGSBEARBEITUNG,  VEREINSV.  4  28.00  DM 

Hinilirinlragan  arwtl  nicht 


cA> 

cA» 

C/T  29.—/«.— 


C/0  29-— /*>.— 


ffle— /ns.— 


ÜVOWC: 

QC  'tVI  nil  Ckln-AMcmmi  trr 
QC  6128  rflfc  »ih-AXjkxnmLtix 

rav  0235  kpl.  Mit  1  trtifVu*  irrt  7%  t>  WM  15«.— 

JofiE  rav  ffil2  Plir  Ipl .  Tir  2  L (1M3)  in!  512  IB  WM  X*.- 
y-'AjatlrttfWrX  Sk  Jkyre  (  1  VBytc  KyitritjC  )  5«.— 

ECtr-l  J’-BstlaAe*:  fit  «4  mit  Ontrallir  uv!  .‘VJknMrfcH  t*  TM— 
diw*n  ffiQ.O  J’-aaLOiufark  wie  Ätrartpr  H>1  Tfi— 

airtkte  OMXD  Mtrixiru ter  (lC5CPS.Ua  Urttaflhr.  )  6«— 
SatarfH  SMCED  MkxixInÖH-  (  ICC  CTB,  NLO.  Hakrcrfllinrg  )  "HB— 
IrtiLd»  (  21  05,  DIN  AHxuit.  Tn*frxfUmip  )  BB— 

fMAtf  (kirnte  ZI  Krtitute  {  EU  05,  MC,  IO)  )  SB.— 

OdlL  ]ß2  (  12)  05,  Na.HT>..'.irtr*,  1  BB- 

Od  ft  132/193  (  16D  (PS,  UQ,  >  OT-— /MB— 

HM  f*iiilz4rr  fit  CFC  «4  am  rtedtbß  dm.  FC TrtrfurStfi  IM.— 

htüulatrr  fit  CSC  2«.— 

05  R7K  GjtuxrLo-  inl  FS-232  afrittsteUe  fit  TLyu.*  140.— 

atrarkr  E^eictöervBtenrq  fit  Jcyce  auf  512  WM  140,— 

Fbrysijyatid«  (  f*>tr  sirtti  )  9.90 

Ttitr*  Eli  Jysuck  I  flmatnlur.  Dmarnum-,  3  (kiffe  ]  35— 

‘»nlnfuaolr  UOOiyn’J  15— 

tolnhirfulf  fit  OC  Otb-ABknaiftr  20-9^2.50 

aalj«ht2tiite  fit  m Iter  (  ÄÜ  «I,  IWJH-  )  15— 

<k4isdi±2hx±e  fit  IDI-l.  H>-1,  QraB  HS.O  15— 

DiAaistot  flt  15/3)  J'-QirfÄtfl)  <  Flip' r. 'Elle  )  M— /«.— 

Dkteftalux  fit  NX)  '3.7T-n»ata«o.  nffc  40— 


KraUc 

3iÄ«rfiie 

Bstimii 

TTüBhflÄ 


C/D  ».— /«— 


C/O  29— /« - 

C/D  J5— /49— 


»fcbiii  of  Stcrloc* 

Bl«äe  Birirer 

»Mxtlt;  l  Scrccry  (  Mvwi'ure  ) 


C/D  K.-/39.- 


Piry  Puy 
Cr&ftui  i  Xu*  (  d«utfi>3i  > 
Itoovy  ai  thr 

ttur  Poe*.  (Spieleoaraüixgi 
SO  Uan»  (^ueli»aircä  i*>j1 
Tfey  Said  a  Nil  lim  II 


C/D  29—/«.— 


C/D  J9.— /49— 


MindestbestBllwt  OM  30—  Bei  Vorauskasse  au ( Software  3  %  Skonto  sowie  Lieferung  frei  Haus. 
Computer  zuzOgl.  DM  ZO. — Porto  und  Verpackung.  Auslandsbestet Hingen  nv  gegen  Vorauskasse. 


mm oi  it co  mov 

lu i  II  u  I  Ll\  I  II  ia 


htUid  1401, 7020  HaMartriN,  Tal  (0  71 21)  4 1«  04 
flaakvart.:  Drasiaar  Daat  NaMaahala  (0L2 11400000t),  Kla.  870 142  000 


7 '86  CPC  31 


3030  GOSÜB  740: IF  t=27  GOTO  3050 

3040  FOR  cal=l  TO  maxcol : f (col , row) =ROUND(f (col ,  yl 
> "  z ,  nachkomma )  :  GOSUB  600:GOSUB  800: NEXT 
3050  RETURN 
3060  : 

3070  '  Zeilensununme  bilden 
3060  : 

3090  pr* =prS+" SUMME" 

3100  GOSÜB  450 

3110  GOSUB  770: IF  t=27  GOTO  3140 

3120  f  (maxcol ,  row>=0:  FOR  col  =  l  TO  maxcol-1 : f (raaxco 
1 ,  row)=RQUND(f  (maxcol ,  row)  +f  <col ,  row) ,  nachkonuna)  :  N 
EXT 

3130  GOSUB  600: GOSUB  800 
3140  RETURN 
3170  : 

3160  ' -Zweizeilenoperationen- 
3190  : 

3200  ' Zweizeilenaddition 
3210  : 

3220  flg=l 

3230  pr$=pr$+" ADDITION” : GOSUB  450 
3240  GOSUB  770: yl=row:  IF  t=27  GOTO  3290 
3260  GOSUB  770: y2=row: IF  t=27  GOTO  3290 
3270  GOSUB  740: IF  t=27  GOTO  3290 

3260  FOR  col  =  l  TO  maxcol :  f  <col ,  row)  = ROUND  <f£  (cqL,  yl 
>+flg*f  <col,  y2)  ,  nachkonuna)  :  GOSUB  600:  GOSUB  600:  NEX 
T 

3290  RETURN 
3300  : 

3310  'Zweizeilensubtraktion 
3320  : 

3330  flg=-l 

3340  pr4=prS+" SUBTRAKTION"  : GOSUB  450 
3350  GOTO  3240 
3410  : 

3420  1 Zweizeilenmultiplikation 
3430  : 

3440  f lg=0 

3450  pr*=pr$+"MULTIPLIKATIQN"  :  GOSUB  450 
3460  GOSUB  770 : y l=row: IF  t=27  GOTO  3520 
3480  GOSUB  770:y2=row: IF  t=27  GOTO  3520 
3490  GOSUB  740: IF  t=27  GOTO  3520 

3500  FOR  col  =  l  TO  maxcol ; IF  flg=0  THEN  f <col,row>= 
ROUND(f (cal,yl>»£(col,y2)  .nachkonuna)  ELSE  IF  f  <col 
, y2 ) < > 0  THEN  f <col , row>=ROUND (f <col , yl > /f <col , y2 ) , 
nachkonuna)  ELSE  f  <col ,  row)=0 
3510  GOSUB  600: GOSUB  600:NEXT 
3520  RETURN 

3530  'Zweizeilendivision 
3540  : 

3550  flg=l 

3560  pr$=prS+“ DIVISION" : GOSUB  450 
3570  GOTO  3460 
3660  : 

3670  'Zweizeilenprozentrechnung 
3680  : 

3690  pr$=pr$+" PROZENT" 

3700  GOSUB  450 

3710  GOSUB  770: yl=row: IF  t=27  GOTO  3780 
3730  GOSUB  770 : y2=row: IF  t=27  GOTO  3780 
3740  GOSUB  740: IF  t=27  GOTO  3780 

3750  FOR  col=l  TO  maxcol : IF  f<col,y2)<>0  THEN  f <co 

1 ,  row)=ROUND(f  Ccol ,  yl )  /100*f  (col ,  y2)  ,  nachkonuna)  EL 

SE  f<col,row)=0 

3760  GOSUB  600: GOSUB  800 

3770  NEXT 

3780  RETURN 

3790  : 

3800  '-Summe  aller  Zeilen- 
3810  : 

3820  FOR  row=l  TO  maxrow: f (maxcol , row) =0 

3830  FOR  col=l  TO  maxcol-1 :  f (maxcol , row) =ROUND <f <m 

axcol ,  row)  +f  (col ,  row)  ,  nachkonuna)  :  NEXT 

3840  GOSUB  600: GOSUB  800: NEXT: RETURN 

3850  : 

3860  '*  SPALTENKALKÜL  * 

3870  : 

3880  ' -Einspal tenoperation- 
3890  : 

3900  'Addition  neuer  Zahl 
3910  : 

3920  f lg=0 

3930  pr$=pr$+" ADDITION" : GOSUB  450 
3940  GOSUB  690 : xl=col : IF  t=27  GOTO  3980 
3950  GOSUB  700: IF  flg  THEN  z=-z 
3960  GOSUB  670: IF  t=27  GOTO  3980 

3970  FOR  row=l  TO  maxrow:  f (col ,  row) =ROUND(f (xl , row 
)  +z ,  nachkonuna)  :  GOSUB  600  :  GOSUB  800 :  NEXT 
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3980  RETURN 
3990  : 

4000  'Subtraktion  neuer  Zahl 
4010  : 

4020  PRINT  wlS;cls$; 

4030  PR INT" SUBTRAKT ION" 

4040  f lg=l : GOTO  3940 
4090  : 

4100  ' Multiplikation  neuer  Zahl 
4110  : 

4120  f lg=0 

4130  prS=pr$+"MULTIPLIKATION" : GOSUB  450 
4140  GOSUB  690: xl=col: IF  t=27  GOTO  4180 
4155  GOSUB  700: IF  flg  THEN  IF  z<>0  THEN  z=l/z 
4160  GOSUB  670: IF  t=27  GOTO  4180 

4170  FOR  row=l  TO  maxrow: f (col , row) =ROUND (f (xl , row 
>*z,  nachkomma)  :  GOSUB  600: GOSUB  800: NEXT 
4180  RETURN 
4190  : 

4200  'Division  neuer  Zahl 
4210  : 

4220  flg=l 

4230  prS=prS+" DIVISION" : GOSUB  450 
4240  GOTO  4140 
4280  : 

4290  'Potenzieren  mit  neuer  Zahl 
4300  : 

4310  pr$=pr$+" POTENZEN" 

4320  GOSUB  450 

4330  GOSUB  690 : xl=col : IF  t=27  GOTO  4370 
4340  GOSUB  700 

4350  GOSUB  670: IF  t=27  GOTO  4370 

4360  FOR  row=l  TO  maxrow: f (col , row) =RQUND (f (xl , row 
>*z,  nachkonuna)  .-GOSUB  600:  GOSUB  800:  NEXT 
4370  RETURN 
4380  : 

4390  ' Spaltensumme 
4400  : 

4410  prS=prS+" SUMME" 

4420  GOSUB  450 

4430  GOSUB  690: IF  t=27  GOTO  4450 

4440  f (col , maxrow) =0 : FOR  row=l  TO  maxrow- 1 : f (col , 
axrow)=ROUND(f (col, maxrow) +f (col , row) , nachkomma)  : 
EXT: GOSUB  600: GOSUB  800 
4450  RETURN 
4490  : 

4500  ' -Zweispaltenoperationen- 
4510  : 

4520  '  Zwei Spaltenaddition 
4530  : 

4540  flg=l 

4550  pr*=prS+" ADDITION" : GOSUB  450 
4560  GOSUB  690: xl=col : IF  t=27  GOTO  4610 
4580  GOSUB  690: x2=col : IF  t=27  GOTO  4610 
4590  GOSUB  670: IF  t=27  GOTO  4610 

4600  FOR  row=l  TO  maxrow: f (col , row)=ROUND (f (xl ,  row 
>+flg*f (x2,  row) , nachkomma)  :  GOSUB  600:  GOSUB  800:  NEX 
T 

4610  RETURN 
4620  : 

4630  ' Zweispaltensubtrakt ion 
4640  : 

4650  flg=-l 

4660  pr$=pr$+" SUBTRAKTION"  :  GOSUB  450 
4670  GOTO  4560 
4730  : 

4740  'Zweispaltenmultiplikation 
4750  : 

4760  f lg=0 

4770  pr*=prS+" MULTIPLIKATION" : GOSUB  450 
4780  GOSUB  690 : xl=col : IF  t=2?  GOTO  4840 
4800  GOSUB  690: x2=col : IF  t=27  GOTO  4840 
4810  GOSUB  670: IF  t=27  GOTO  4840 

4820  FOR  row=l  TO  maxrow: IF  flg=0  THEN  f(col,row)= 
ROUND (f (xl, row) *f (x2,  row)  ,  nachkomma)  ELSE  IF  f(x2, 
row) <>0  THEN  f (col , row)=ROUND(f (xl,  row)/f (x2,  row) , 
nachkomma)  ELSE  f (col , row>=0 
4830  GOSUB  600: GOSUB  800: NEXT 
4840  RETURN 

4850  'Zweispaltendivision 
4860  : 

4870  flg=l 

4880  prS=prS+"DIVISION"  .-GOSUB  450 
4890  GOTO  4780 
4980  : 

4990  'Zweispaltenprozentrechnung 
5000  : 

5010  prS=prS+* PROZENT" 

5020  GOSUB  450 
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C/0  39.-/S9. — 

Fighting  Wainor/Explodlng  Fist 

D  69,— 

9ombjack 

C  39,- 

The  Devil's  Crown 

C/D  39-/59, — 

30  Cyrus  (Schach) 

C/D  39-/49, — 

30  Grand  Prix 

C/D  39-/49, — 

Super  Pipeline 

C/D  36-/56- 

Codename  Mat  il 

C/D  29-/59  — 

Sorcery 

29.— 

Sorcery+  (Disk  3") 

59  — 

Fiank  Bruno  s  Box  ng 

C/D  29-/49, — 

Spy  vs  Spy 

C/D  39-/49, — 

Elite 

0  79  — 

^Spitfire  40 

C/D  39-/49, — 

^  mit  deutschem  Handbuch  ^ 

Brandaktuell 

AMX-Mouse 

Mit  Software  (Zeichenprogramm 

+  Basicer  Weiterung)  Ähnlich 

wie  bei  Macintosh  und 

Atari  520  ST  für  CPC  464, 

664  und  6128. 

Komplett  DM  298,- 

_ > 

Joyce: 

Bildschirmfilter  89,— 

3"-Diskette  CF2-DD  19,80 

Parallel-  u.  Seriellschnittstelle  148, — 

Farbband  24,80 

Für  Joyce  PCW  8256: 

Megabytelaufwerk  698  — 

AufrÜrtkit  von  256KB  au<  51 2KB  149, — 

DATEI-STAR  98  — 

STAR-MAIL  98,— 

FI8U-STAR+  298, — 

STAR-BASE  198. — 


Hardware: 

3"  1  -Megabyte-Laufwerk  für  Joyce  698  — 
Alle  Vortex-Erweiterungen  ab  Lager  lieferbar 
Vortex-Diskettenlaufwerke: 

5  Vt"  Einfachlaufwerk  mit  708  KB  formatiert, 
aufrustbar  zum  Doppellaufwerk  (548,-  DM)  mit 
resistenten  Assembler,  Disassembler.  Monitor 
und  RSX-Befehlen.  Anlegen  von  Random- 
Dateien  unter  Basic. 

Fl  -S  5  14"  Floppy  1198,- 

M1-S  3  W  Floppy  998,- 

F1-D  5  V«"  Doppellaufwerk  1 698  — 

Ml -D  3 ’A"  Doppellaufwerk  1498,- 

F1-X  5  %"  Zweitlaufwerk  708KB, 
ROM-Software  758- 

M1-X  wie  F1-X,  |edoch  3  ’A"  758 - 

Aufrüstkit  für  80  Spur  Doppellaufwerke 
als  X-Laufwerk  298.- 

Adapterkabel  zum  Anschluß  der 
Schneider-Floppy  an  F1-S  (M1-S) 
oder  F1-D  (M1-0)  als  2.  Laufwerk  58,— 


■  v  ‘  r 

f 

Graffpad  II 

•  Auflösung :  1280x1024  Bildpunkte 

•  Abweichung :  ±  1  Pixel 

•  Zeichenflache  DIN  A4 

•  hochauflösende  Graphik 

•  Schaltungsdiagramme 

•  CAD  _ 

•  Abmessungen:  350x260x12  mm  ^ 

Fordern  Sie  kostenlosen  Prospekt  an 1 

Sie  werden  begeistert  sein !  ?? 

Preis:  464,  664 
6128 

•  Optionswahl 

•  Formeingabe  ^ 

•  Bilderspeicherung  und  Abruf  4s. 

•  Textillustration  ^ 


/ 


ifk, 


248,- 

278,- 


wsaai*««. 


ß 


Händleranfragen  erwünscht 
Schulen  erhalten  Sonderkonditionen 


Rxsdamer  Rng  10  -  7150  Backnang  [g 071 91/1528-29 


aWUTER-ELEKTRONIK 


STAR-WRITER I  (464  /  664  /  6126) 

Das  zur  Zeit  leistungsfähigste  Textsystem  für  den  CPC,  das 
völlig  neue  Maßstabe  in  Bedienung  und  Leistung  setzt! 


Textverarbeitung 
Grafikprogramm 
DIN-Tastatur 
Serienbriefe 
Blockoperationen 
Trennvorschläge 
Suchen  und  Ersetzen 


mit  ausführlichem  Handbuch  nur  198 


Adressverwaltung 
DFÜ-Programm 
PULL-DOWN  Menues 
Fließtexteingabe 
Block-  und  Flattersatz 
Bausteinverarbeitung 
Kopf-  und  Fußzeilen 


Mflchtl|is  Zuhahtfn 

Abdeckhauben  aus  grauem  Kunstleder 

Konsole  464/664/61 28 

Floppy  DD1/FD1 

Floppy  Vortex  FD-1 

Monitor  grün 

Monitor  color 

Drucker 

Drucker  (NLQ/DMP) 

Druckerkabel  464/664 
Druckerkabel  6128 
Lightpen  für  CPC  6128 
Farbband  (black)  für  Okimate  20 
Farbband  (colour)  für  Okimate  20 
Schneider  Joystick 
Disketten  3'' 

Disketten  DS/OD  5  14" 

Traktor  für  NLQ  401 
Farbband  für  NLQ  401 
Farbband  für  DMP  2000 
Schutzhaube  Rauchglas 
f.  Konsole  464/664 
Druckerstander  Rauchglas 
Disk  box  3" 

RS  232  (V  24) 

Telefonmodem 

Ssftwara: 

Barry  Mc  Guigan's  Boxing 
Mindshadow 
Cheops 
Spitfire  40 
Hyper  Sports 
Night  Shade 
Heavy  on  the  Magic 
Blade  Runner 
Monty  on  the  Run 
Vokabeltrainer 
Verbentrainer 
Rock'n  Wrestle 
Red  Hawk 
8lue  Ribbon 
They  sotd  a  Million  II 
Movie 
Ballblazer 
Back  to  the  Future 
Rescue  on  Fractalus 
Batman 
Bounder 

Flbuking  (Finanzbuchhaltung) 

Fakturem  (Speicherfakturierung) 
Profirem  (Faktu,  Lager,  Adressen) 


Der  Diamant  von  Rabanfels 
Reise  durch  die  Zelt 
Sherlock  Holmes 
Auftrag  In  der  Bronx 
Drachenland 
Die  Insel  der  Smaragde 
Das  Pharaonengrab 
je  Adventure 

C/D  DM  39, — /49, — 


19.80 

16.80 

19.80 

26.80 

29.80 

19.80 

19.80 

48.50 

58.50 
139. — 

14. — 
17. — 

39.50 
fl  12  — 

10  39  — 

79.50 

14.80 

19.80 

35,— 
98,— 
39,80' 
168. — 
298. — 

C/D  39-/69. — 
C/0  39-/59. — 

36 _ 

C/D  39, -/59  — 
C/D  37-/69, — 
35, — 
39. — 
35  — 
C/0  39.-Z59, — 
C/D  49-/59,— 
C/D  39-/49. — 
39, — 
35, — 
D  59, — 
C/D  39-/59. — 
C/D  35-/49. — 
C/D  39-/59. — 
C/D  39-/59. — 
C/D  39,-/59.— 
35.— 


/o  Senden  Sie  mir  bitte  unverbindlich  Ihren 

CPC -Katalog  zu. 

O  Hiermit  bestelle  ich  per  Nachnahme: 


Vornan«.  Nun« 
Sluftt,  Hiuwwnvnw 


HZ.  Ort 


T«t«ton -Nummer 


Datum.  Uouvschr ift 


5030  GOSUB  690: xl=col : IF  t=27  GOTO  5100 
5050  GOSUB  690: x2=col : IF  t=27  GOTO  5100 
5060  GOSUB  670: IF  t=27  GOTO  5100 

5070  FOR  raw= 1  TO  maxrow; IF  f(x2,row)<>0  THEN  f (co 

1 ,  row) =ROUND (f (xl,  row)/100*f (x2, row> , nachkonma)  EL 

SE  f(col,raw)=0 

5080  GOSUB  600: GOSUB  800 

5090  HEXT 

5100  RETURN 

5110  : 

5120  ' -Summme  aller  Spalten- 
5130  : 

5140  FOR  col  =  l  TO  maxcoi  :  f  <col ,  maxrow)  =0 

5150  FOR  row=l  TO  roaxrow-1 ; f (cal , maxrow) =RQUND(f (c 

ol , roaxrow) +f (col , row) , nachkomma ) : NEXT 

5160  GOSUB  600: GOSUB  800 : NEXT: RETURN 

5170  : 

5180  ' *  EINZELFELDKALKUL  * 

5190  : 

5200  ' Einzelf eldaddition 
5210  : 

5220  flg=l: pr$=pr$+" ADDITION" : GOSUB  450 
5230  GOSUB  560: xl=col :  yl=row:  IP  t=27  THEN  RETURN 
5240  GOSUB  560 : x2=col : y2=row: IF  t=27  THEN  RETURN 
5250  GOSUB  540: IF  t=27  THEN  RETURN 

5260  f (col ,  row) =ROUND (f (xl,yl)+flg*f (x2, y2) , nachko 
mroa) 

5270  GOSUB  600: GOSUB  800: RETURN 
5380  : 

5390  1 Einzelf eldsubtraktian 
5400  : 

5410  f lg=- 1 : pr$=pr$+" SUBTRAKTION" : GOSUB  450: GOTO  5 

230 

5570  : 

5580  ' Einzelf eldroultiplikatian 
5590  : 

5600  flg=0:  pr$=pr$+" MULTIPL IKATION"  :  GOSUB  450 
5610  GOSUB  560:  xl=col :  yl=row:  IF  t=27  THEN  RETURN 
5620  GOSUB  560 : x2=cal : y2=row: IF  t=2?  THEN  RETURN 
5630  GOSUB  540: IF  t=27  THEN  RETURN 
5640  IF  flg=0  THEN  f (cal , row) =ROUND (f (xl , yl ) *f (x2 , 
y2 >,  nachkomma >  ELSE  IF  f(x2,y2)<>0  THEN  f (col ,  row) 

=  RQUND(f (xl , yl) /f (x2, y2)  ,  nachkomma)  ELSE  f  (col, row 
>  =0 

5650  GOSUB  600: GOSUB  800: RETURN 
5760  : 

5770  ' Einzelf elddivison 
5780  : 

5790  f lg=l : pr$=pr$+" DI VISION" : GOSUB  450: GOTO  5610 
5960  : 

5970  ’ Einzelfeldprazentrechnung 
5980  : 

5990  pr$  =  pr$-+'* PROZENT"  :  GOSUB  450 

6000  GOSUB  560: xl=col: yl=row: IF  t=27  THEN  RETURN 
6010  GOSUB  560: x2=col : y2=row: IF  t=27  THEN  RETURN 
6020  GOSUB  540:  IF  t=27  THEN  RETURN 

6030  IF  f  <x2 , y2) <>0  THEN  f (col , row) =ROUND (f (xl , yl ) 


/100*f (x2, y2) , nachkomma)  ELSE  f(col,row)=0 
6040  GOSUB  600: GOSUB  800: RETURN 
6130  : 

6140  'Einzelfeldaddition  mit  Neuzahl 
6150  : 

6160  flg=0: pr$=pr£+" ADDITION" : GOSUB  450 

6170  GOSUB  560: xl=cal: yl=row: IF  t=27  THEN  RETURN 

6180  GOSUB  700: IF  flg  THEN  z=-z 

6190  GOSUB  540: IF  t=27  THEN  RETURN 

6200  f (col , row) = ROUND (f (xl ,  y 1 ) +z  ,  nachkomma ) : GOSUB 

600: GOSUB  800: RETURN 

6300  : 

6310  ' Einzelfeldsubtraktion  mit  Neuzahl 
6320  : 

6330  flg=l: pr$=pr$+" SUBTRAKT ION": GOSUB  450: GOTO  61 
70 

647  0  : 

6480  ' Ei nzel f eldmul t ipl ikat i on  mit  Neuzahl 
6490  : 

6500  f lg=0: pr$=pr$+" MULTI PLI KAT ION" : GOSUB  450 

6510  GOSUB  560: xl=col:yl=row: IF  t=27  THEN  RETURN 

6520  GOSUB  700: IF  flg  THEN  IF  z<>0  THEN  z=l/z 

6530  GOSUB  540: IF  t=27  THEN  RETURN 

6540  f (col,  row) = ROUND (f (xl , yl )*z,  nachkomma) : GOSUB 

600: GOSUB  800: RETURN 

6640  : 

6650  'Einzelfelddivision  mit  Neuzahl 
6660  : 

6670  f lg= 1 : pr$=pr£+" DI VISION" : GOSUB  450: GOTO  6510 
6820  : 

6830  'Einzelfeldpotenzierung  mit  Neuzahl 
6840  : 

6850  pr$=pr$+" POTENZ" : GOSUB  450 

6860  GOSUB  560 : xl=col : y l=row: IF  t=27  THEN  RETURN 
6870  GOSUB  700 

6880  GOSUB  540: IF  t=27  THEN  RETURN 

6890  f (col , row)=ROUND (f (xl , yl ) “z , nachkomma) : GOSUB 

600: GOSUB  800: RETURN 

6990  : 

7000  'Taste 
7010  : 

7020  PRINT"Bitte  gewünschte  Taste  drücken 

7030  t*=INKEY* : VHILE  t$=" t$= INKEYS : VEND: t$=UPPER 

£  (t$) 

7040  zif f=INSTR(r$, t£) : IF  ziff=0  THEN  GOTO  7030 
7050  RETURN 
7060  : 

7070  'Ende 
7080  : 

7090  PRINT  w0&[ crsanS; eis#; "Programm  beendet" 

7100  END 

7200  ecod=ERR: elin=ERL 

7210  PRINT  wlfc; clsS: PRINT, "Fehler  Nr.";ecod;"  in  Z 
eile" ; el ln: PRINT, "eine  Taste  drücken..." 

7220  PRINT  invonS; ersoff : GOSUB  800 
7230  PRINT  beepS; : VHILE  INKEYS  =  " "  :  VEND 
7240  PRINT  invof f£; : GOSUB  800:RESUME  NEXT 


DIE  JOYCE-DATABOX 

SOFTWARE  FÜR  DEN  SUPER  RECHNER 

Jetzt  gibt’s  die  Databox-Disk  auch  für  den  Joyce: 

und  außerdem  als  praktisches  Databox-Abo  ^i**0*^ 

Alle  Joyce-Programme  aus  dem  Heft  finden  Sie  ”  ready  Co  run"  auf  unserer  praktischen  Databox.  ^  ^  ^ 

Zusätzlich  enthält  die  Joyce-Databox  noch  ein  Bonus- Programm. 

Diesen  Monat:  Schiffe  versenken  -  das  bekannte  Strategiespiel.  A\V>^ 

Kinzelbezug:  ^ 

Kinzelbezugspreis  für  DA  l  ABOX:  Diskette  3”  24,-  DM  zuzüglich  3,-  DM  Porto/Verpackung 
(im  Ausland  zuzüglich  5.-  DM  Porto/\  erpackung). 

Das  Databox-Abo  kostet: 

Als  Diskette  für  1/2  Jahr  (6  Lieferungen): 

Im  Inland  und  West-Berlin  150,-  DM,  im  europäischen  Ausland  160,-  DM,  im  außereuropäischen  Ausland  180,-  DM 
z\ls  Diskette  für  I  Jahr  (12  Lieferungen): 

Im  Inland  und  West-Berlin  300,-  DM,  im  europäischen  Ausland  320,-  DM,  im  außereuropäischen  Ausland  360,-  DM 
In  den  vorgenannten  Preisen  sind  die  Versand-  und  Verpackungskosten  enthalten.  Bitte  benutzen  Sie  für  Ihre  Bestellung  die  Abo-Karte. 
Zahlungsweise:  Am  einfachsten  per  Vorkasse  (Verrechnungsscheck)  oder  als  Nachnahme  zuzüglich  der  Nachnahmegebühr 

(in  das  Ausland  ist  Nachnahme  nicht  möglich). 


34  CPC  7 '86 


Abo-Order 

»ZEITSCHRIFT« 

»DATABOX« 


Abgesandt  am: 


198 _ 


Bemerkungen: 


Abo-Order 

»ZEITSCHRIFT« 

»DATABOX« 


Das  kompetente  Magazin  für 
alle  Schneider-Anwender! 

Bestellen  Sie  noch  heute 
Ihr  Abonnement 
mit  dieser  Postkarte! 


B-i'e 

au  reichend 
frankieren 


Antwortkarte 


Schneider  CPC  International 
Postfach  250 

3440  Eschwege 


»RESTPOSTEN-PACK  I98S« 
»Einzelhefte  1986« 

Abgesandt  am: 


198 _ 


Bemerkungen: 


SONDERAKTION 
»Restposten-Pack  1985« 
»Einzelheftbestellung  1986« 


Antwortkarte 


BiUe 

OWireif  hend 

frankieren 


Absender:  (Bitte  genaue  Anschrift  angeben!) 


Name 


Vorname 


Schneider  CPC  International 
Postfach  250 


Firma 


StraBe/Nr  /Postfach 


3440  Eschwege 


PLZ/Ort 


Einzelbezug 

»DATABOX« 


Abgesandt  am: 


Bemerkungen: 


198 _ 


Einzelbezug 

»DATABOX« 

Absender:  (Bitte  genaue  Anschrifl  angeben!) 


Name 


Vorname 


Firma 


Bille 

ausreichend 

frankieren 


Antwortkarte 


Schneider  CPC  International 
Postfach  250 


Straße/Nr /Postfach 


3440  Eschwege 


PLZ/Ort 


»Abo-Order  Zeitschrift« 

Hiermit  bestelle  ich  „Schneider  CPC  International"  für  mindestens 
□  1/2  Jahr  □  1  Jahr 
Zustellung,  Vertriebskosten  und  MwSt  sind  im  günstigen 
’reis  von  30,-  DM  bzw.  60,-  DM  enthalten  (BRD  und  West-Berlin) 
Auslandspreise:  Eurem  12  Ausgaben  -  90,-  DM, 

>  Ausgaben  -  45,-  DM 

kuBeraurepIlichei  Ausland  1 2  Ausgaben  -  1 20,-  DM, 

>  Ausgaben  -  60,-  DM 

.ieferung  soll  ab  Ausgabe  Nr  .  erfolgen 

lufaransclirlfl 

□  Geschäft  □  Privat 

--LLI  I  I  I  I  I  I  I  I  I  I  I  I  I  I 

/orname.  Name 

I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I 

-irma  (nur  wenn  lieferadresse) 

I  I  I  I  I  I  I  I  I  I  I  I  II  I  I  I 

Straße,  Nr /Postlach 

’LZ/Oft  (Bille genaue  Anschrift  angeben!) 

'ieses  Abonnement  verlängert  sich  automatisch  um  1/2  bzw  1  Jahr,  wenn 
s  nicht  sechs  Wochen  vor  Ablauf  schriftlich  gekündigt  wird 


»Abo-Order  DATABOX« 

Hiermit  bestelle  ich  die  □  CPC  Databox  □  Joyce-Databox 
für  mindestens  □  1/2  Jahr  □  1  Jahr 
als  DCassette  □  Diskette 

Bezugspreise  Inland  (einschl  Porto/Verpackung) 

Cass  1/2  Jahr  90,- DM,  1  Jahr  180,- DM 
Disk  3"  1/2  Jahr  150,-  DM,  1  Jahr  300,-  DM 
Bezugspreise  Ausland  (eingeklammerte  Werte  außereuropäisch) 
Cass  1/2  Jahr  100,-  (120,*)  DM,  1  Jahr  200,- (240,-)  DM 

Disk  3"  1/2  Jahr  160,- (180,-)  DM,  1  Jahr  320,- (360,-)  DM 


Gewünschte  Zahlungswelte: 

□  Bequem  und  bargeldlos  durch  Bankabbuchung 


1  1  1 

||  ||  ||  ||  ||  | 

Bankleitzahl 

INI 

(von  Scheck 
.  1  1  1 

abschreiben)  ^ 

Konto-NrHnhaoer 

1  1  1  II  1  1  1  1  1  1 

Geldinstitut 

□  Gegen  Dachung-  zahlbar  innerhalb  zwei  Wochen  nach  Erhalt 
(Bitte  keine  Vorauszahlung  leisten  -  Rechnung  abwarten ) 

Garantie: 

Ich  weiß,  daß  ich  diese  Vereinbarung  innerhalbeiner  Woche  bei  der  Bestell¬ 
adresse  schrifllich  widerrufen  kann,  wobei  bereits  die  rechtzeitige  Absen¬ 
dung  meines  Widerrufschreibens  zur  Fristwahrung  ausreicht  Ich  bestätige 
das  durch  meine  zweite  Unterschritt 


Datum  Unterschrift 

bei  Minderjährigen:  Unterschritt  des  ges  Vertreters) 

3itte  unbedingt  zwei  Unterschriften  leisten! 


Datum 


Unterschrift 
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Abo-Zeitschrift 

Abo-DATABOX 

Bestellen  Sie  Ihr  Abonnement  mit 
der  nebenstehenden  Karte! 
Preisvorteil  gegenüber  dem  Einzel¬ 
bezug! 

Mit  einem  Databox-Abo  erhalten  Sie 
die  Software  zum  Magazin  immer 
pünktlich  und  mit  einem  saftigen 
Preisvorteil  gegenüber  dem  Einzel¬ 
bezug! 


Bestellkarte 
»RESTPOSTEN-PACK  1985« 
»EINZELHEFTE  1986« 

Wir  räumen  unser  Lager  und  bieten 
unseren  Lesern,  die  1 985  noch  nicht 
"dabei"  waren,  die  Möglichkeit,  die 
noch  vorhandenen  Ausgaben  des  ver¬ 
gangenen  Jahres  preisgünstig  “im 
Paket"  zur  erstehen.  Dies  sind  die 
Ausgaben  8, 10, 11  und  12/85 
Bitte  benutzen  Sie  hierfür  die  neben¬ 
stehende  Karte! 

Die  1 986'er  Ausgaben  sind  noch 
sämtlich  erhältlich. 
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»DATABOX« 

Einzelbezug 

Die  Software  zum  Magazin! 
Problemlos  bestellen  mit  der  Anfor¬ 
derungskarte! 


mm  i  imiiiiinn  i  iimnniii 


III . . . 


Das  Schnittstellenmodul  für  den  Joyce 

Kommunikations¬ 
freudige  Sackgasse 


Nachdem  in  Ausgabe  6/86  schon  ”ein 
wenig”  auf  das  Schnittsteilenmodul  für 
den  Joyce  anhand  einer  Datenübertra¬ 
gung  zwischen  dem  Joyce  und  dem 
Apple  Macintosh  eingegangen  worden 
war,  folgt  hier  nun  ein  weiterer  Praxis¬ 
test  mit  ein  paar  wertvollen  Tips  für  den 
Transfer  von  Programmen: 

Legt  man  dem  Händler  148,-  DM  auf 
den  Ladentisch,  so  erhält  man  eine 
handliche  Schachtel  mit  der  vielsa¬ 
genden  Aufschrift  "CPS  8256  -  Cen¬ 
tronics  Parallel  /  RS  232C  Seriell 
Schnittstelle".  In  der  Schachtel  findet 
man  das  heißersehnte  Modul  im 
Joyce-farbenen  Plastikgewand,  zwei 
Schrauben  zur  Befestigung  und  ein 
37-seitiges  "Benutzer-Handbuch”. 


Acht  Bit  nebeneinander: 
Die  parallele  Schnittstelle 


Jetzt  braucht  man  nur  noch  das 
Modul  (bei  ausgeschaltetem  Compu¬ 
ter)  auf  den  Erweiterungsport  stecken 
und  mit  den  beiden  (schwergehen¬ 
den)  Schrauben  sicher  befestigen. 
Wird  nun  CP/M  gebootet,  so  sollte 
die  Einschaltmeldung  um  ”SIO/ 
Centronics-Zusatz”  erweitert  sein  - 
anderenfalls  stimmt  etwas  nicht!!! 

Allerdings  ist  die  Freude  nicht 
ungetrübt:  unter  LocoScript  kann 
man  die  Schnittstelle  schon  einmal 
nicht  ansprechen.  (Vielleicht  wird 
dies  aber  bei  einer  neueren  Version 
einmal  möglich  sein.)  Auch  die  me¬ 
chanische  Konstruktion  hat  ihre 
Nachteile:  Daß  das  Modul  die  Schrau¬ 
ben  zum  Öffnen  des  Computers  ver¬ 
deckt,  ist  nicht  so  tragisch.  Viel  schlim¬ 
mer  ist  die  Tatsache,  daß  der  Sy¬ 
stembus  nicht  durchgeführt  wurde. 
Erweiterungen  wie  Festplatte  oder  ex¬ 
ternes  Diskettenlaufwerk  sind  also 
über  einen  Zwischenstecker  anzu¬ 
schließen.  Und  ob  sich  das  Mon¬ 
strum  Zwischenstecker  und  Modul 
noch  stabil  befestigen  läßt,  erscheint 


doch  sehr  fraglich  -  aber  lassen  wir 
uns  überraschen. 

Das  Leben  mit  dem  Modul  wird  durch 
die  Dokumentation  sehr  erleichtert. 
Der  größte  Teil  der  Beschreibung  ist 
der  seriellen  Schnittstelle  gewidmet. 
Lobenswert  sind  die  Beispiele  für  Ka¬ 
belverbindungen  sowie  die  Schaubil¬ 
der  der  Steckerbelegung.  Etwas  frag¬ 
würdig  ist  ein  Programm  zur  seriellen 
Datenübertragung.  Es  liegt  als  Hex¬ 
dump  vor  und  soll  mittels  PIP  einge¬ 
geben  werden  (viel  Spaß...). 

Weiterhin  wird  das  Terminalprogramm 
MAIL232.COM  vorgestellt. 

Eifrige  "Wühler”  werden  es  schon  auf 
der  LocoScript-Diskette  entdeckt  ha¬ 
ben.  Für  Mailboxfreaks  und  zur  Ter¬ 
minalemulation  ist  das  Programm 
zwar  brauchbar,  zur  Programm¬ 
übertragung  jedoch  weniger,  wie  noch 
zu  sehen  sein  wird.  Doch  schreiten 
wir  zum  Praxistest. 

So  kurz  wie  die  Beschreibung  im 
Handbuch  fiel  auch  der  Test  der  pa¬ 
rallelen  Schnittstelle  aus.  Es  handelt 
sich  um  eine  Standard-Centronics- 
Schnittstelle  mit  zwei  Handshake- 
Leitungen  und  acht  Datenleitungen 
(Schneider  kann  es  also  doch...). 

Ein  EPSON  FX-80  lieferte  im  ”CTRL 
P”-Modus  ein  korrektes  Protokoll, 
nachdem  der  Joyce-Drucker  mit 
DEVICE  LST:=CEN 
abgeschaltet  wurde. 


Frust  und  Lust: 

Die  serielle  Schnittstelle 


Der  Rest  der  Testsitzung  war  der  seri¬ 
ellen  Schnittstelle  gewidmet  Die  Test¬ 
konfiguration  bestand  aus  einem  Joyce 
mit  besagter  Schnittstelle,  einem 
Eigenbau-CP/M-Rechner  mit  5  1/4”- 
Laufwerken,  einem  mehr  und  einem 
weniger  erfahrenen  Freak.  Ein  Venti¬ 
lator  und  einigen  Flaschen  Orangen¬ 
saft  als  Kühlmittel  für  Rechner  und 
Freaks  rundeten  den  Versuchs aufbau 
ab. 

Hier  nun  die  Erfahrungen  der  Sit¬ 


zung,  die  um  3  Uhr  nachmittags  be¬ 
gann  und  gegen  Mitternacht  endete: 
Das  passende  Verbindungskabel  zu 
"schneidern”,  war  dank  der  Doku¬ 
mentation  kein  Problem.  Die  Rech¬ 
ner  wurden  miteinander  verbunden, 
ein  Kommunikationsprogramm  auf 
beiden  Seiten  geladen  (für  den 
Joyce  MAIL232,  auf  der  anderen 
Seite  TELNET),  Ubertragungsformat 
abgestimmt  und  die  Sache  lief-  wenn 
auch  mehr  schlecht  als  recht. 
Zunächst  kamen  bei  9600  Baud 
Übertragungsrate  nicht  alle  Zeichen 
durch,  die  Geschwindigkeit  mußte 
also  gesenkt  werden.  Weiterhin  störte, 
daß  MAIL232  die  Echofunktion 
nicht  unterstützte,  d.h.  die  Eingabe 
erschien  nicht  auf  dem  Bildschirm. 
Als  nächstes  wurde  versucht,  eine 
Programmdatei  zu  übertragen.  Dazu 
wurde  eine  COM-Datei  mit  einem 
Hilfsprogramm  in  das  Intel-HEX- 
Format  umgewandelt.  Laut  Hand¬ 
buch  sollte  MAIL232  dieses  Übertra¬ 
gungsformat  unterstützen,  was  sich 
jedoch  als  Gerücht  erwies:  MAIL232 
hängte  sich  unwiderruflich  auf.  Also 
mußte  ein  anderes  Terminalprogramm 
her. 

Wegen  der  Protokollierungsart  wurde 
TELNET  gewählt,  ins  Intel-HEX- 
Format  umgewandelt  und  mittels 
PIP  zum  Joyce  geschickt.  Dabei  tra¬ 
ten  drei  Probleme  auf: 

Zunächst  fehlte  am  Ende  der 
Übertragung  das  ”CTRL-Z”  zum 
ordnungsgemäßen  Abschluß  der 
Übertragung.  Hier  half  ein  kleines 
Hilfsprogramm,  welches  dieses  Zei¬ 
chen  auf  die  Schnittstelle  ausgab. 
Zum  zweiten  waren  9600  Baud  wieder 
zu  schnell,  es  stellten  sich  4800  Baud 
als  optimale  Übertragungsrate  her¬ 
aus,  die  auch  im  folgenden  beibehalten 
wurde.  Schließlich  lag  das  HEX-File 
auf  dem  Joyce  vor  und  wurde  mit  dem 
CP/M- Dienstprogramm  HEXCOM 
wieder  zu  einem  lauffähigen  Pro¬ 
gramm  gemacht.  Doch  dann  wurde 
es  ausweglos. 

Da  TELNET  direkt  auf  die  Schnitt¬ 
stelle  zugreift,  wurde  deren  Adresse 
benötigt.  Eine  Analyse  von  MAIL232 
ließ  die  gesuchte  Adresse  jedoch  im 
Dunkeln.  Das  einzige,  was  dabei  her¬ 
auskam  war,  daß  die  Schnittstelle 
sehr  wahrscheinlich  als  Speicher¬ 
platz  (LD...),  nicht  aber  als  Portbau¬ 
stein  (OUT...)  angesprochen  wird, 
was  für  ein  CP/M-System  recht  unge¬ 
wöhnlich  ist 

Also  war  TELNET  als  Transferpro¬ 
gramm  auf  dem  Joyce  gestorben  und 
mehr  als  drei  Stunden  Forschungsar¬ 
beit  futsch.  Der  weniger  erfahrene 

Fortsetzung  auf  Seite  1 10 
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Wir 

basteln 

ein 

Limbo 

Mit  SUBMIT-Dateien  kann  man  ohne 
viel  Mühe  neue  CP/M-Befehle  einfüh¬ 
ren,  zum  Beispiel,  um  gelöschte  Da¬ 
teien  bequem  wieder  ”zum  Leben  zu 
erwecken”. 


CP/M  auf  dem  Joyce: 

So  erweitert  man 
die  Steuersprache 

Die  Textverarbeitungs-Software  Lo- 
coScript,  die  mit  dem  Joyce  mitgelie¬ 
fert  wird,  enthält  ihr  eigenes  Be¬ 
triebssystem  LOCO,  das  im  Dateifor¬ 
mat  mit  CP/M  weitgehend  kompati¬ 
bel  ist.  Wer  schon  mit  LocoScript  ge¬ 
arbeitet  hat,  wird  den  Begriff  ’Trans- 
Datei”  kennen.  Das  ist  eine  Datei,  die 
eigentlich  schon  gelöscht  worden  ist. 
Man  kann  sie  sich  in  der  "Diskver- 
waltung”  jedoch  (als  Option)  noch 
auflisten  und  mit  einer  anderen  Option 
auch  aus  dem  ”Trans”-Zustand  wie¬ 
der  zurückholen,  also  die  Löschung 
rückgängig  machen.  Dies  kann 
manchmal  hilfreich  sein,  wenn  man 
z.B.  eine  Datei  versehentlich  gelöscht 
hat  (oder  nach  falscher  Bearbeitung 
wieder  auf  einen  früheren  Zustand 
zurücksetzen  will). 

Unter  dem  zweiten  ladbaren  Be¬ 
triebssystem  CP/M  ist  jedoch  kein 
”Trans”-Zustand  (engl,  limbo:  ”Vor- 
hölle,  Rumpelkammer”)  vorgesehen. 
Hat  man  eine  Datei  mit  ERASE  ge¬ 
löscht,  dann  ist  sie  weg  und  mit  norma¬ 
len  Hilfsmitteln  nicht  mehr  erreich¬ 
bar  (einen  ”Disc  Doctor”  gibt  es  für 
den  Joyce  leider  noch  nicht).  Wie 
sofort  gezeigt  werden  soll,  kann  man 
jedoch,  ohne  Maschinensprache,  As¬ 
sembler  oder  Compiler  zu  bemühen, 
einen  sogar  mit  LOCO  kompatiblen 
Limbo-Zustand  unter  CP/M  und  ent¬ 
sprechende  Kommandos  zu  einer 
Handhabung  einführen. 

Zunächst  müssen  wir  jedoch  heraus¬ 
bekommen,  wie  der  Trans-Zustand 
von  LOCO  eigentlich  unter  CP/M 
aussieht.  Mit  etwas  Probieren  ist  dies 
ganz  einfach:  Haben  wir  den  Joyce 
mit  CP/M  gebootet  (und  möglichst 
das  Programm  DIR.COM  auf  die 


iiiiiiimim 


”RAM-Floppy”  M:  kopiert),  so  kön¬ 
nen  wir  eine  von  LocoScript  verwal¬ 
tete  Diskette  einlegen  und  den  CP/M- 
Befehl  DIR  geben. 

Dieser  gibt  uns  jedoch  nur  die  Na¬ 
men  der  Dateien  der  ersten  LOCO- 
Gruppe  (ohne  Trans-Dateien)  aus. 
Auch  DIR  [FULL]  bringt  uns  nicht 
viel  weiter.  Probieren  wir  dagegen 
einmal  DIR  [USER=ALL]  (für  sol¬ 
che  Optionen  brauchen  wir  eben  das 
Programm  DIR.COM),  so  stellen  wir 
mit  Überraschung  fest,  wieviele 
"User”  auf  unserer  Diskette  ihr  Werk 
treiben:  Die  "Gruppen"  unter  LOCO 
("gruppeO”  bis  ”gruppe7”,  sofern  wir 
ihnen  nicht  andere  Namen  gegeben 
haben)  entsprechen  jeweils  einem 
"User”  unter  CP/M,  nämlich  0..7. 

Je  nachdem,  in  welcher  Gruppe  die 
Diskette  Trans-Dateien  enthält,  fin¬ 
den  wir  aber  noch  weitere  "User”: 
User  8  z.B.  enthält  die  Trans-Dateien 
zu  Gruppe  0  usw.  So  langsam  kom¬ 
men  wir  dem  ”Trans”-Zustand  also 
auf  die  Schliche.  Wenn  wir  unter 
LOCO  eine  Datei  löschen,  so  wird 
zunächst  einfach  nur  ihre  Gruppen¬ 
nummer  um  8  erhöht  Im  Inhaltsver¬ 
zeichnis  der  Disk-Verwaltung  taucht 
sie  nun  nicht  mehr  auf  (wenn  wir 
nicht  die  Option  "Anzeigen  Trans” 
gewählt  haben),  ebensowenig  bei  der 
Angabe  des  verfügbaren  Speicher¬ 
platzes.  Tatsächlich  gelöscht  wird  sie 
allerdings  erst  dann,  wenn  eine  an¬ 
dere  Datei  auf  der  Diskette  mehr 
Platz  benötigt,  als  noch  frei  ist. 

So  weit,  so  gut.  Wir  haben  nun  unter 
CP/M  die  gleiche  Möglichkeit:  Wir 
können  die  Usernummer  einer  Datei 
beim  Umkopieren  mit  PIP  ändern. 
Der  Befehl  würde  etwa  lauten:  PIP 
A:NAME.TYP[G8]=A:NAME.  TYP 
[GO]  (damit  haben  wir  die  Datei  zu¬ 
nächst  unter  der  anderen  Usemummer 
noch  einmal  kopiert),  anschließend 
ERASE  NAME.TYP  (dies  löscht  nur 
die  Version  unter  der  aktuellen  User¬ 
nummer,  also  in  der  Regel  0).  Das  ist 
jedoch  viel  Tipperei  für  eine  Löschung. 
Schöner  wäre  es,  wenn  CP/M  einen 
Befehl  wie  DELETE  NAME.TYP  ver¬ 
stehen  und  in  dem  Sinne  ausführen 
könnte,  daß  es  die  Datei  NAME.TYP 
zunächst  in  den  Limbo  schickt 
Das  Mittel  der  Wahl  ist  hier  eine 
SUBMIT-Datei.  Eine  solche  Datei 
trägt  die  Typkennung  .SUB  und  ent¬ 
hält  im  ASCII-Format  eine  oder 
mehrere  Anweisungszeilen  an  CP/M 
oder  auch  an  aufgerufene  Program¬ 
me.  Wird  sie  explizit  aufgerufen 
(durch  SUBMIT  NAME),  so  werden 
die  darin  enthaltenen  Zeilen  der 
Reihe  nach  an  den  Rechner  gefüttert, 
als  ob  wir  sie  über  Tastatur  eingege¬ 
ben  hätten.  Wenn  wir  (z.B.  in  der 


Startdatei  PROFILE.SUB)  die  Such¬ 
reihenfolge  SETDEF  [ORDER= 
(SUB, COM)]  vereinbart  haben,  so 
reicht  sogar  NAME  (ohne  SUBMIT) 
für  den  Aufruf  aus. 

Ein  Beispiel:  Auf  den  CP/M-Prompt 
A>  (oder  B>,  oder  M>)  hin,  wird 
XYZ  eingegeben.  Das  System  merkt, 
daß  dies  keine  der  eingebauten 
Funktionen  (DIR,  DIRSYS,  ERASE, 
RENAME,  TYPE,  USER)  ist,  sucht 
darum  zuerst  eine  Submit-Datei 
XYZ.SUB  und  führt  sie  aus,  sofern 
gefunden.  Anderenfalls  sucht  es  ein 
ausführbares  Programm  XYZ.COM 
und  führt  dieses  aus,  wenn  vorhanden. 
Im  letzten  Fall  (wenn  weder  XYZ.SUB 
noch  XYZ.COM  existieren)  kommt 
es  zu  der  bekannten  Fehlermeldung 
XYZ? 

Beim  Aufruf  einer  SUBMIT-Datei 
kann  man  bis  zu  9  Parameter  überge¬ 
ben,  auf  die  nach  ihrer  Stellung  mit  den 
"Variablennamen”  $  1  bis  $9  zugegrif¬ 
fen  werden  kann.  Somit  steht  unse¬ 
rem  ersten  Limbo-Befehl  nicht  mehr 
viel  im  Wege. 

Wir  eröffnen  mit  einem  Editor  (ED 
oder  RPED)  eine  Datei  namens  DE- 
LETE.SUB  und  geben  Listing  1  ein. 
In  der  ersten  Zeile  kopieren  wir  (PIP) 
die  Datei  namens  $1  (dafür  wird  der 
erste  Parameter  des  Aufrufs  einge¬ 
setzt)  unter  dem  gleichen  Namen, 
aber  der  Usernummer  8  ([G8]),  wobei 
die  Optionen  O  (sollte  man  immer 
verwenden:  ganze  Datei,  und  nicht 
nur  bis  zum  ersten  CTRL-Z,  kopie¬ 
ren)  und  W  (evtl,  eine  nur  lesbare 
Datei  gleichen  Namens  überschrei¬ 
ben)  gelten.  In  der  zweiten  Zeile 
löschen  wir  das  Original  bei  User  0, 
da  wir  ja  eine  Sicherheitskopie  bei 
User  8  haben. 

Wenn  wir  jetzt  diese  SUBMIT-Datei 
z.B.  mit  DELETE  TEST.l  aufrufen, 
so  sehen  wir  auf  dem  Bildschirm  die 
beiden  Befehlszeilen,  wobei  jedoch 
$1  durch  TEST.l  ersetzt  wurde,  und 
die  Systemreaktionen  darauf  (wenn 
der  Name  z.B.  nicht  existierte).  Ein 
Blick  mit  DIR  zeigt,  daß  TEST.l 
tatsächlich  "verschwunden"  ist  (in 
die  Zählung  des  freien  Speicherplat¬ 
zes  mit  SHOW  geht  die  "gelöschte” 
Datei  logischerweise  nicht  ein,  da  sie 
unter  der  Benutzernummer  8  noch 
existiert). 

Wie  holen  wir  eine  Datei  aus  dem 
Limbo  zurück?  Ganz  einfach:  UN- 
DELETE  NAME  heißt  das  Kom¬ 
mando,  UNDELETE.SUB  die  SUB- 
MIT-Datei.  Ihren  Inhalt  sehen  Sie  in 
Listing  2. 

Die  erste  Zeile  kopiert  die  Datei  na¬ 
mens  $1  (also  erster  Aufrufparameter) 
von  User  8  mit  den  Optionen  O  und 
W  (wie  oben)  unter  gleichem  Namen 
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zu  User  0.  Anschließend  löschen  wir 
die  Sicherheitskopie  in  User  8 
(diesmal  richtig).  Da  ERASE  keine 
Usernummern  als  Parameter  akzep¬ 
tiert,  müssen  wir  vorher  (durch  USER 
8)  in  die  Rolle  des  Users  8  schlüpfen 
und  hinterher  mit  USER  0  wieder 
zurück. 

Jetzt  können  wir  UNDELETE  TEST.  1 
eingeben,  und  die  bedingte  "Löschung” 
von  DELETE  TEST.l  wird  rückgängig 
gemacht.  Das  Ziel  ist  erreicht,  nun 
haben  wir  auch  unter  CP/M  einen 
Limbo! 


(Bei  beiden  SUBMIT-Dateien  kön¬ 
nen  keine  Platzhalterzeichen  ver¬ 
wendet  werden;  es  können  also  mit 
einem  Befehl  nur  einzelne  Dateien 
gelöscht  bzw.  wieder  zurückgeholt 
werden.) 

Zur  weiteren  Übung  und  Komfort- 
Steigerung  definieren  wir  jetzt  noch 
einen  Befehl  namens  DIRDEL.SUB, 
der  (analog  zu  DIR  und  DIRSYS) 
den  Inhalt  des  Limbo  anzeigt  (s. 
Listing  3:  DIRDEL.SUB). 

Hier  sollte  alles  klar  sein.  Die  Kom¬ 
mentare  (hinter  dem  Strichpunkt) 


werden  bei  der  Ausführung  mit 
ausgegeben. 

Ein  weiterer  Befehl  heißt  KILL.SUB 
(s.  Listing  4:  KILL.SUB). 

Die  dritte  Zeile  ist  ein  kleiner  Trick. 
Das  Zeichen  <  markiert  die  Zeile  als 
Eingabe  für  ein  Programm  (nämlich 
ERASE).  Dieses  fragt  ERASE  *.*?  (Y/ 
N)  und  begnügt  sich  mit  dem  ”y”  als 
Antwort  -  das  unsichtbare  RETURN 
am  Ende  der  Zeile  erzeugt  eine  War¬ 
nung  (PROGRAM  INPUT  IGNO- 
RED),  die  wir  aber  getrost  überlesen 
dürfen. 

Die  Beispiele  mögen  genügen,  um  zu 
zeigen,  wie  einfach  die  Steuersprache 
von  CP/M  Plus  um  neue  Kommandos 
erweitert  werden  kann.  Je  nach  den 
Wünschen  des  Benutzers  kann  er 
sich  eine  Steuersprache  "maßschnei- 
dern"  -  ein  letztes  Beispiel,  wie  man 
das  sperrige  PIP  zum  COPY  macht 
(COPY.SUB): 
pip  $2=$l[o  r] 

PIP  NEUNAME=ALTNAME  kann 
jetzt  also  in  der  Form  COPY 
ALTNAME  NEUNAME  eingegeben 
werden,  wobei  die  Optionen  O  und  R 
(Quelldatei  kann  auch  System- 
Eigenschaft  haben)  als  "Bonbon”  da¬ 
zugegeben  werden. 

(Richard  Suchenwirth) 


Listing  1:  DELETE. SOB 

Listing  2:  UNDELETE, SUB 

pip  $1XG8Ü=$1X0  Vü 
erase  $1 

pip  *1äG0ü=S1äG8  0  Vü 
user  8 
erase  $1 
user  0 

Listing  3:  DIRDEL.SUB 

user  8  ;*»***  Verzeichnis 
dir 

user  0  ;**♦**  Sie  können  mit 

der  mit  DELETE  gelöschten  Dateien  ***** 

UNDELETE  <narae>  zurückgeholt  werden  ***** 

Listing  4:  KILL.SUB 

user  8;  *****  Endgültiges  Löschen  der  mit  DELETE  gelöschten  Dateien  !  ***** 
erase  *.* 

<y 

user  0 

Die  Zeichen  X  und  ü  entspr. 

der  eckigen  Klammer  auf  bzw.  zu. 
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CBasic-Compfller 


Hersteller:  Digital  Research 
Vertrieb:  Fachhandel 
Rechner:  CP/M  80,  CP/M  Plus, 
(CPC’s,  JOYCE) 

Preis:  ca.  180,-  DM 

Mit  dem  ”CBasic*Compiler”  von 
Digital  Research  steht  nun  auch  den 
Besitzern  von  Schneider  Computern, 
den  CPC’s  sowie  dem  Joyce  dieses 
umfangreiche  und  leistungsstarke 
Werkzeug  für  die  Programmentwick¬ 
lung  unter  dem  Betriebssystem  CP/M 
zur  Verfügung.  ”CBasic”  kombiniert 
die  Möglichkeiten  einer  strukturier¬ 
ten  Hochsprache  mit  der  Einfachheit 
von  Basic  und  stellt  ein  einfaches  und 
leicht  zu  bedienendes  Entwicklungs¬ 
system  dar.  Diese  Behauptung  ist  nun 
bitte  nicht  auf  die  Goldwaage  zu  le¬ 
gen;  die  Programmentwicklung  mit 
diesem  Compiler  erfordert  von  Natur 
aus  etwas  mehr  Geduld  und  Disziplin 
im  Gegensatz  zur  Programmierung 
mit  Hilfe  eines  Basic-Interpreters 
bzw.  eines  Compilers  wie  Turbo- 
Pascal. 

Hat  man  sich  aber  erst  einmal  mit  dem 
Umgang  und  den  Möglichkeiten  die¬ 
ses  Entwicklungssystems  vertraut  ge¬ 
macht,  so  werden  die  anfangs  als 
nachteilig  empfundenen  Eigenheiten 
mehr  als  nur  wiedergutgemacht,  z.B. 
durch  die  Geschwindigkeit  der  in 
Maschinencode  übersetzten  Basic- 
programme. 

Ein  weiteres  Merkmal  ist  die  von 
"CBasic”  mit  einer  Vielzahl  von  Be¬ 
fehlen  unterstützte  Grafikprogram¬ 
mierung,  die  sich  auf  die  Systemer¬ 
weiterung  des  CP/M-Betriebssystems 
GSX  stützt.  Dies  bedeutet,  daß  die 
Verwendung  der  Grafikbefehle  nur 
auf  dem  CPC  6128  und  dem  Joyce,  die 
beide  GSX  unterstützen,  möglich  ist. 
Alle  anderen  Möglichkeiten  von 
"CBasic”  können  aber  auch  auf  dem 
CPC  464  und  CPC  664  genutzt  wer¬ 
den.  Für  Joyce-Besitzer  eröffnet  sich 
dadurch  unseres  Wissens  eine  bis 
jetzt  einzigartige  Alternative  zur  pro¬ 
fessionellen  Grafikprogrammierung. 
Ebenso  vorteilhaft  ist  die  Verfügbar¬ 
keit  des  Compilers  auf  den  Be¬ 
triebssystemen  CP/M  86,  MS-DOS 
und  PC-DOS.  Dadurch  können  auf 
8-Bit-Rechnern  entwickelte  CBasic- 


Programme  nach  einer  Neukompilie- 
rung  auch  auf  Rechnern  der  16-Bit- 
Welt  eingesetzt  werden,  wenn  auf 
Assembler-Unterroutinen  und  sy¬ 
stemspezifische  Eigenheiten  verzich¬ 
tet  wurde. 

Auf  der  einseitigen  Diskette  befinden 
sich  Compiler,  Linker,  das  Biblio¬ 
theksprogramm  LIB  sowie  die  not¬ 
wendige  Laufzeitbibliothek  (Details 
dazu  später).  Zum  Erstellen  und  Te¬ 
sten  der  Basic-Programme  werden 
noch  weitere  Hilfsprogramme  benö¬ 
tigt,  die  sich  auf  den  zum  Computer 
gehörenden  Systemdisketten  befin¬ 
den  und  auf  eine  Kopie  der  CBasic- 
Diskette  hinzukopiert  werden.  Dabei 
handelt  es  sich  um  einen  Texteditor 
wie  ED  oder  Wordstar  zur  Erstellung 
der  Quelldateien,  sowie  einen  "De¬ 
bugger”  (SID  oder  DDT)  zur  Fehler¬ 
suche.  Hat  man  nur  ein  Laufwerk  zur 
Verfügung,  so  ist  die  Aufteilung  der 
Programme  des  CBasic-Systems  auf 


Basic-Befehle  des  Compilers: 

CALL,  CHAIN,  CLOSE,  COMMON, 
CONSOLE,  CREATE,  DATA,  DEF, 
DELETE,  DETACH,  DIM,  END, 
FEND,  FOR,  GOSUB,  GOTO,  IF, 

IF  ENI),  INITIALIZE,  INPUT, 

IN  PUT  LINE,  INTEGER,  LET, 
LPRINTER,  NEXT,  ON,  ON  ERROR, 
OPEN,  OUT,  POKE,  PRINT,  PRINT 
USING,  PRINT  #,  PUT, 
RANDOMIZE,  READ,  READ  #, 
READ  #  LINE,  REAL,  REM, 
RESTORE,  RETURN,  STOP, 
STRING,  WEND,  WHILE 

Basic-Funktionen: 

ABS,  ASC,  ATN,  ATI  ACH,  CHRS, 
COMMANDS,  CONCHAR%, 
CONSTAT%,  COS,  ERR,  ERRL, 
ERRX,  EXP,  FLOAT,  FRE,  GET, 
INKEY,  INP,  INT,  !NT%,  LEFT$, 
LEN,  LOCK,  LOG,  MATCH,  MFRE, 
MID$,  MOD,  PEEK,  POS, 
RENAME,  RIGHTS,  RND,  SADD, 
SGN,  SHIFT,  SIN,  SIZE,  SQR, 
STR$,  STRINGS,  TAB,  TAN, 
UCASES,  UN  LOCK,  VAL,  V.4RPTR 

Grafik-Befehle  und  -Funktionen: 

BEAM,  BOUNDS,  CHARACTER 
HEIGHT,  CLEAR,  CLIP,  COLOR, 
COLOR  COUNT,  DEVICE, 
GRAPHIC  CLOSE,  GRAPHIC 
IN  PUT,  GRAPHIC  OPEN, 
GRAPHIC  PRINT,  JUSTIFY,  LINE 
STYLE,  MARKER  HEIGHT, 
MARKER  TYPE,  MAT  FILL,  MAT 
MARKER,  MAT  PLOT,  PLOT, 
POSITION,  STYLE  COUNT,  TEXT 
ANGLE,  VIEWPORT,  WINDOW 


zwei  Disketten  notwendig:  eine  Com¬ 
pilerdiskette,  auf  der  die  Quelldatei 
erstellt  und  anschließend  kompiliert 
wird.  Die  vom  Compiler  erzeugte  re- 
lozierbare  Maschinencode-Datei  wird 
dann  auf  die  Linker-Diskette  kopiert, 
dort  mit  den  benötigten  Routinen  aus 
den  Bibliotheken  verbunden  und  in 
ein  ausführbares  Programm  umge¬ 
setzt. 

”C  Basic”  bietet  neben  den  bei  heuti¬ 
gen  Dialekten  üblichen  Kontroll¬ 
strukturen,  Befehlen  und  Funktionen 
weitere  interessante  Möglichkeiten 
und  Eigenschaften.  So  wird  keine 
fortlaufende  Zeilennumerierung  be¬ 
nötigt:  Ziele  bei  Unterprogrammauf¬ 
rufen  und  Sprüngen  werden  durch 
Symbole  angegeben.  Wie  in  Pascal 
können  Variablen  vor  ihrer  ersten 
Verwendung  deklariert  werden.  Es 
können  Funktionen  mit  formalen 
Parametern  vereinbart  werden,  die 
sich  über  mehrere  Zeilen  erstrecken 
und  "beliebig”  viele  Befehle  enthal¬ 
ten.  In  diesen  ist  die  Vereinbarung 
von  "lokalen”  Größen  möglich,  was 
bei  komplexen  Programmen  von 
großem  Vorteil  ist.  Solche  Funktio¬ 
nen  können  auch  einzeln,  d.h.  ohne 
Hauptprogramm,  übersetzt  und  in 
Bibliotheken  mittels  LIB  "gesam¬ 
melt”  werden.  Auf  diese  Weise  kann 
man  Module  für  verschiedene  Aufga¬ 
ben  (Grafik,  E/A  usw.)  entwickeln 
und  austesten.  Bei  der  späteren  An¬ 
wendung  brauchen  diese  dann  nicht 
mehr  übersetzt  werden.  Im  aufrufen¬ 
den  Programm  muß  nur  noch  die 
Funktionsvereinbarung  vorhanden 
sein;  der  Linker  fügt  dann  die  benö¬ 
tigten  Routinen  aus  den  Bibliotheken 
und  das  kompilierte  Hauptprogramm 
zusammen. 

Ebenso  ist  der  Linker  in  der  Lage, 
Overlays  zu  erzeugen,  die  vom  Haupt¬ 
programm  mit  dem  CHAIN-Befehl 
aufgerufen  werden.  Dieses  enthält 
alle  Bibliotheks-Routinen,  was  die 
Größe  und  Ladezeit  von  Overlavs  re¬ 
duziert.  Auch  können  mit  einem  As¬ 
sembler  erstellte,  relozierbare  Ma¬ 
schinenroutinen  in  Basicprogramme 
eingebunden  werden. 

Die  Dokumentation  umfaßt  ca.  300 
Seiten,  in  denen  die  Eigenschaften 
und  Möglichkeiten  von  "CBasic"  voll¬ 
ständig,  aber  in  Englisch,  beschrie¬ 
ben  werden.  Wer  als  Anfänger  mit  der 
Anschaffung  dieses  Compilers  spe¬ 
kuliert,  der  wird  allerdings  nicht 
umhin  kommen,  sich  etwas  intensi¬ 
ver  mit  der  Materie  (Programmie¬ 
rung)  vertraut  zu  machen. 

Im  großen  und  ganzen  bietet  "CBasic” 
ein  sehr  leistungsfähiges  Werkzeug 
zur  Entwicklung  von  Basicprogram- 
men.  Wer  sehr  umfangreiche  Ba- 
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sicprogramme  oder  als  Joyce-Besitzer 
Grafik  selbst  programmieren  möchte 
bzw.  muß.  dem  wird  hiermit  eine  sehr 
gute  und  leistungsfähige  Alternative 
zum  Schneider-  bzw.  Mallard-Basic 
geboten. 

(MC) 
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Workwrfter  Jr. 

-  eine  Alternative  ? 

Vertrieb:  GEPO  Soft 

4220  Dinslaken 
Preis:  ca.  159,-  DM 

Ursprünglich  für  den  IBM-PC  und 
Kompatible  entworfen,  wird  dieses 
Textverarbeitungsprogramm  jetzt  von 
der  Firma  GEPO  Soft  in  einer  unter 
CP/M  plus  dem  CPC  6128  angepaßten 
V  ersion  angeboten. 

Nachdem  man  das  Programm  an  den 
Rechner  und  den  jeweiligen  Drucker 
angepaßt  hat,  kann  die  eigentliche 
Schreibarbeit  beginnen. 

Hierzu  stehen  dem  Anwender  die  bei 
einem  Textsystem  dieser  Leistungs¬ 
klasse  gewohnten  Editier-  und  For¬ 
matierfunktionen  zur  Verfügung. 

Zur  Bildschirmausgabe  des  Textes 
verwendet  Workwriter  jr.  selbster¬ 
stellte  Zeichen;  dieses  unterstützt  die 
Anzeige  unterstrichener  oder  fett¬ 
zudruckender  Texlpassagen.  Zusätz¬ 
lich  zu  den  Textfunktionen  wird  dem 
Benutzer  eine  recht  einfache  Block¬ 
grafik  zur  Verfügung  gestellt,  die  die 
Sonderzeichen  des  6128  benutzt  und 
die  Kombination  von  Text  und  klei¬ 


nen  Grafiken  und  Schaubildern  er¬ 
möglicht.  Allerdings  ist  diese  Option 
recht  unbequem  zu  bedienen;  so  wird 
der  geneigte  Anwender  seinen  Quar¬ 
talsumsatz  wohl  doch  lieber  mit  ge¬ 
flügelten  Worten  umschreiben,  als 
sich  der  Blockgrafik  zu  bedienen. 

Die  Textarbeit  wird  in  den  Schreib¬ 
und  Befehlsmodus  unterteilt.  Dies 
bietet  einerseits  den  Vorteil,  daß  eine 
Fehlbedienung  durch  versehentli¬ 
ches  Drücken  der  "falschen”  Taste 
fast  ausgeschlossen  ist,  jedoch  kann 
andererseits  das  Editieren  längerer 
oder  komplexer  Texte  durch  ständige 
Abfragen  (bis  zu  dreimal  pro 
Funktion)  schnell  lästig  werden. 

Zur  Hervorhebung  bestimmter  Pas¬ 
sagen  oder  Worte  sind  diese  unterstri¬ 
chen  oder  fettgedruckt  (oder  beides) 
darstellbar.  Auch  hier  trübt  wieder 
die  Ausführung  die  gute  Idee,  den 
dargestellen  Text  nicht  durch  Steuer¬ 
zeichen  zu  verunzieren:  Da  fett¬ 
zudruckende  Zeichen  und  solche,  die 
zusätzlich  zu  unterstreichen  sind, 
gleichermaßen  invers  am  Monitor 
dargestellt  werden,  sind  sie  nicht  zu 
unterscheiden.  Zudem  wird  man  in 
einem  invers  dargestellten  Textfeld 
über  die  Cursorposition  im  unklaren 
gelassen,  da  der  Cursor  nicht  inver¬ 
tiert  wird. 

Workwriter  arbeitet  seitenorientiert; 
dies  bedeutet,  daß  die  erstellten  Seiten 
einzeln  abgespeichert  werden  müs¬ 
sen,  was  die  Arbeit  mit  Workwriter  jr. 
zusätzlich  verkompliziert.  Auch  die 
Formatierarbeit  geschieht  nicht  en 
bloc,  sondern  muß  zeilenweise  ge¬ 
schehen.  Zudem  ist  das  einzige 
Umbruchkriterium  bei  Zeilenende 
das  Leerzeichen;  den  Bindestrich  er¬ 
kennt  das  Programm  nicht  an. 

Das  Fazit  aus  diesen  Erkenntnissen 
läßt  das  Preis-/Leistungsverhältnis 
von  Workwriter  jr.  etwas  im  Regen 
stehen;  obwohl  mit  guten  Features 
und  optimalen  Anpassungsmöglich¬ 


keiten  an  Rechner  und  Drucker  aus¬ 
gestattet,  ist  die  Umsetzung  der 
Möglichkeiten  (vielleicht  aufgrund 
der  Umsetzung  von  IBM  auf  CPC?) 
in  Richtung  Bedienerfreundlichkeit 
etwas  verunglückt. 

(me) 


Mathepack 

Hersteller:  RSE 
Vertrieb:  RSE 
Steuerung:  Tastatur 
Monitor:  Farbe/Grün 
Programm:  Basic 
Preis:  DM  59,- 

CPC  464  B  CPC  664  B  CPC  6128  B 

Mathematik  heißt  jene  geheimnis¬ 
volle  schwarze  Magie,  die  Schülern 
und  Eltern  Rätsel  aufgibt,  für  den 
einen  überhaupt  keine  Geheimnisse 
hat  und  für  den  anderen  ein  Buch  mit 
sieben  Siegeln  ist. 

Um  nun  dem  stolzen  Besitzer  eines 
CPC  ein  wenig  auf  die  Sprünge  zu 
helfen,  gibt  es  von  der  Firma  RSE  ein 
Mathepack,  das  beim  Erlernen  dieses 
Themas  ein  wenig  hilft  und  auch  bei 
der  Lösung  von  kniffeligen  Proble¬ 
men  als  guter  Freund  hilfreich  zur 
Seite  steht. 

Dabei  beschäftigt  sich  Mathepack 
nicht  nur  mit  den  Grundrechenarten, 
sondern  geht  gleich  ans  Eingemachte. 
Algebra,  Geometrie,  Trigenometrie, 
Analyse  und  Kurvendiskussion. 
Hinzu  kommen  noch  Mengenlehre 
und  ein  Taschenrechner  für  die  Grund- 


Schneider  CPC  464  CPC  664  CPC  61 28  und  Joyce 

Wir  bieten  an: 

Finanzbuchhaltungsprogramm 

Erstes  Programm  mit  Rückgaberecht 

Ein  Vertrauensbeweis,  verbunden  mit  der  Qualität 
unseres  Programmes.  Programmpflege  und  Service 

Information  02306/491 72 

nur  499f-  DM 

Automatische  Prüfroutinen  u.  Stornierung,  unzulässige 
Buchungen  nicht  möglich,  daher  auch  von  Laien 
sofort  anwendbar. 

DAST-Mobil  GmbH  Abt  EDV,  Saarbrücken^.  56, 4670  Lünen 


Neu  —  Neu  —  Neu  —  Neu! 


•  GSX-Graphic-Treiber 

(BASIC)  64,- 

(für  Striche,  Kästchen,  Polygon¬ 
züge  -  Kreise,  Kuchen,  Torten, 
Männchen).  Endlich  kann  die 
Grafik-Fähigkeit  der  JOYCE 
genutzt  werden! 

•  Aufrüstung 

JOYCE  auf  JOYCE  Plus 

-  RAM-Erweiterung  von 

256  KB  auf  612  KB,  mit  aus- 
führl.  Einbauanleitung  129,- 

-  2.  Laufwerk 

FD-2, 1  MB  599,- 


• 

JOYCE  Plus 

2.349,- 

• 

JOYCE 

1.699,- 

• 

Bildschirmfilter  für 

-  GT  64,  GT  65 

bis  12/85 

54,- 

-  CTM644 

74,- 

-  JOYCE 

84,- 

3"-Disketten  CF2, 

250  KB  10  Stück  109,- 

3"-Disketten  CF2DD, 

1  MB  5  Stück  99,- 


Telefon  (0  70  71)  6  60  22 

G  +  W  •  Hartmeyerstraße  50  •  7400  Tübingen 
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rechenarten. 

Das  heißt  jetzt  allerdings  immer  noch 
nicht,  daß  sich  ein  in  Mathe  vollkom¬ 
men  Unbedarfter  jetzt  plötzlich  mit 
den  kompliziertesten  Gleichungen 
auseinandersetzen  kann. 

Ein  geringes  Grundwissen  in  Mathe¬ 
matik  ist  immer  noch  vonnöten. 
Trotzdem  bietet  Mathepack  dem  Ein¬ 
steiger  und  Fortgeschrittenen  alles. 


was  er  zur  Bewältigung  von  alltägli¬ 
chen  und  auch  nicht  so  häufig  vor¬ 
kommenden  Problemen  benötigt. 
Bedient  wird  das  Programm  über 
zahlreiche  Menues  und  bietet  hier 
auch  absolut  keinen  Ansatzpunkt  zur 
Kritik  Das  Handbuch  ist  zwar  ein 
wenig  dünn,  reicht  allerdings  zur  Be¬ 
dienung  des  Programms  aus. 
Sonderfunktionen  wie  Text-  und 
Grafik-Hardcopy  in  verschiedenen 
Formaten  sowie  ein  Anpassungs- 
menue  an  die  einzelnen  Druckerty¬ 
pen  bestätigen  den  Preis  und  geben 
dem  Ganzen  den  professionellen 
Touch. 

Mathepack  eignet  sich  für  Schüler 
und  Studenten,  kann  allerdings  auch 
geplagten  Eltern  recht  hilfreich  sein. 

(TM) 


Textman 

Hersteller:  Data  Berger 
Vertrieb:  Data  Berger 
Steuerung:  Tastatur 
Monitor:  Farbe/Grün 
Programm:  Basic/M-Code 
Preis:  DM  98- 

CPC  464  B  CPC  664  K  CPC  6128  8 


Nach  wie  vor  sind  Textverarbeitungen 
die  meistverbreitetste  Anwendung 
auf  den  CPC  Rechnern.  Neu  in  die 
große  Palette  der  Textsysteme  ist  jetzt 
der  Textman  von  Data  Berger  ge¬ 
kommen. 

Textman  ist  eine  ziemlich  schnelle 
und  übersichtlich  gegliederte  Textver¬ 
arbeitung,  die  unter  AMSDOS  läuft. 
Der  Anwender  erhält  also  keinen  je¬ 
ner  CP/M-Giganten,  die  alles  können, 
sondern  eine  gute  Textverarbeitung, 
die  durch  geschickte  Programmie¬ 
rung  die  begrenzten  Möglichkeiten 
des  AMSDOS  ausnutzt. 

Natürlich  muß  von  den  reinen  Lei¬ 
stungsdaten  her  in  Bezug  auf  Text¬ 
speicher  ein  gewisser  Abstrich  ge¬ 
macht  werden,  aber  Textman  gibt  sich 
größte  Mühe,  dieses  Manko  durch 
Anwenderfreundlichkeit  wettzumachen. 

Nach  dem  Laden  hat  man  zunächst 
einmal  die  obligatorische  Wahl  der 
Tastaturbelegung  und  des  Zeichen¬ 
satzes.  Sind  diese  Eingaben  gemacht, 
gelangt  man  in  das  Hauptmenue 
in  dem  man  zunächst  einmal  die 
Druckerinstallation  anwählen  sollte. 
Bei  diesem  Installationsprogramm 
zeigt  sich  der  Textman  von  seiner  be¬ 
sten  Seite.  Die  Installation  geht  sehr 
einfach  von  der  Hand  und  erfordert 
kein  Suchen  im  Handbuch. 
Zurückgekehrt  ins  Hauptmenue  kann 
man  sich  dann  an  das  eigentliche 
Textverarbeiten  machen.  Dazu  muß 
erst  einmal  die  Schreiboberfläche 
initialisiert  werden  und  Angaben 
über  Zeilenbreite,  Seitenlänge  und 
ähnliches  gemacht  werden. 

Diese  etwas  umständliche  Vorge¬ 
hensweise  kann  man  als  veraltet  be¬ 
zeichnen  und  hier  hätte  etwas  kom¬ 
fortabler  gearbeitet  werden  können. 
Dafür  wird  man  nach  der  Initialisie¬ 
rung  aber  auch  mit  einem  sehr  schön 
gegliederten  Bildschirm  überrascht. 


Das  Arbeiten  im  Text  geht  erfreulich 
flott,  und  auch  Verzögerungen  durch 
Wortumbruch  sind  ausgeschaltet. 
Das  Blatt  scrollt  mit  einer  annehmba¬ 
ren  Geschwindigkeit. 
Kontrollfunktionen  und  Druckersteu¬ 
erzeichen  können  in  gewohnter  Ma¬ 
nier  über  SHIFT  und  CTRL  vorge¬ 
nommen  werden. 

An  Kontrollfunktionen  bietet  Text¬ 
man  alles,  was  man  von  einer  moder¬ 
nen  Textverarbeitung  erwarten  kann. 
Tabulatoren,  Zeilenbefehle  und  Block¬ 
operationen  sind  vorhanden  und  las¬ 
sen  keine  Kritik  zu. 

Will  man  Worte  suchen  oder  erset¬ 
zen,  so  muß  man  leider  erst  ins 
Hauptmenue  zurückkehren.  Hier  ste¬ 
hen  neben  den  obligatorischen  ”Search 
&  Replace”-Operationen  noch  ein 
Farbmenue,  ein  Discmanagerund  das 
Druckermenue  zur  Verfügung. 

Der  Gesamteindruck  vom  Textman 
ist  positiv,  allerdings  sucht  man  bei 
diesem  Programm  verzweifelt  die 
Sensation,  die  heutzutage  eine 
Textverarbeitung  haben  muß.  Man 
kann  weder  Text  mit  Grafik  mischen, 
noch  Adressen  in  den  Text  einiesen. 
Textman  ist  einfach  nur  ein  recht 
gutes  Textsystem,  dessen  einziger 
Verwendungszweck  das  Erstellen 
von  Texten  ist.  Sicherlich  ist  dies  ja 
auch  die  eigentliche  Anforderung,  die 
man  an  eine  Textverarbeitung  stellen 
sollte,  aber  wenigstens  ein  kleines 
Bonbon  hätte  man  ja  beipacken 
können. 

(TM) 
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Fairlight 

Hersteller:  The  Edge 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca  39.-DM 


CPC  464  B  CPC  664  B  CPC  6128  B 

Vor  langer  Zeit  wurde  das  Land  von 
Fairlight  von  einem  Geschlecht  güti¬ 
ger  und  weiser  Herrscher  regiert. 
Doch  irgendwann  verspann  sich  die¬ 
ses  Herrscherhaus  in  die  Ränke  und 
Intrigen  seiner  mächtigen  Feinde. 
Ein  großer,  sinnloser  Krieg  ent¬ 
brannte.  In  seinem  Verlauf  verlor 
Fairlight  alles,  was  es  einst  groß  und 
mächtig  gemacht  hatte. 

Den  Feinden  des  Landes  gelang  es 
sogar,  bis  in  die  Festung  der  Herren 
von  Fairlight  vorzudringen  und  dort 
allen  Widerstand  zu  überwinden.  Um 


die  Macht  der  Könige  ein  für  allemal 
zu  brechen,  ersannen  die  Feinde 
Fairlights  einen  so  finsteren  und 
bösen  Zauber,  daß  dieser,  einmal  an¬ 
gewandt,  sich  über  das  ganze  Land 
ausbreiten  würde. 

3000  Jahre  ist  es  nun  her,  daß  die  dunk¬ 
len  Mächte  mittels  ihrer  Magie  das 
Herrscherhaus  von  Fairlight  stürz¬ 
ten.  Finsternis  kam  über  das  Land, 
und  auch  die  bösen  Mächte,  die  diese 
Finsternis  beschworen,  sind  ver¬ 
schwunden.  Nur  der  Zauber  ist  geblie¬ 
ben  und  geißelt  das  Land  bis  zum 
heutigen  Tage. 

Aber  irgendwann  glaubt  ein  junger 
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Eine  ganze  Welt,  die 
durch  und  durch  von 
Magie  beherrscht  wird, 
ist  der  Schauplatz  die¬ 
ses  brillianten  Arcade- 
Adventures.  In  einer 
Burg,  auf  der  seit 
Urzeiten  ein  Fluch  liegt, 
muß  ein  geheimnisvol¬ 
les  Zauberbuch  gefun¬ 
den  werden.  Mit  dessen 
Hilfe  besteht  die  Mög¬ 
lichkeit,  den  garstigen 
Fluch  zu  brechen. 
Fairlight  stellt  übrigens 
den  ersten  Teil  einer 
Trilogie  dar,  und  ist 
inzwischen  mit  einer 
deutschen  Anleitung  zu 
haben. 


Mann,  daß  die  Greuelgeschichten, 
die  sich  um  die  Herrenburg  Avars 
und  den  Burgwald  darumherum  er¬ 
zählt  werden,  lediglich  eine  alte  Mär 
seien,  und  wagt  sich  in  den  verwun¬ 
schenen  Wald.  Doch  schon  bald  hat 
er  sich  zwischen  den  finsteren  Bäu¬ 
men  verlaufen,  und  nach  und  nach 
verläßt  ihn  sein  Mut.  Als  dann  auch 
noch  eine  seltsame  Frau  vor  ihm  er¬ 
scheint  und  sich  mit  süßlicher 
Stimme  als  Ogri  vorstellt,  sinkt  ihm 
das  Herz  gänzlich  in  die  Hose.  Und 
obwohl  Ogri  versichert,  daß  er  nichts 
zu  befürchten  hätte,  fällt  er  in  Ohn¬ 
macht. 

Als  er  wieder  erwacht,  liegt  er  in  einer 
dunklen  Höhle  und  vor  ihm  steht  ein 
sehr  alter  Mann,  der  ihm  bedeutet,  so 
schnell  wie  möglich  die  Höhle  zu  ver¬ 
lassen.  Denn  Ogri  würde  bald  zurück¬ 
kehren  und  dann  sei  sein  Leben  ver¬ 
wirkt.  Irritiert  von  all  den  Eindrücken, 
folgt  unser  junger  Held  seinem  Füh¬ 
rer  aus  der  Höhle.  Über  manchen  fast 
unpassierbaren  Pfad  windet  sich  der 
Weg,  den  er  gehen  muß,  immer  weiter 
bergan,  bis  sie  vor  einer  mächtigen 
Mauer  stehen,  in  der  ein  schmaler 
Spalt  klafft.  Der  Alte  bedeutet  ihm 
durch  diesen  Spalt  zu  gehen,  und 
unserem  Helden  sinkt  schon  wieder 
der  Mut,  denn  das  einzige  Bauwerk  in 
weitem  Umkreis  ist  die  verwunschene 
Burg  Avar.  Kaum  hat  er  die  Mauer 
passiert,  schließt  sich  der  Spalt  hinter 
ihnen  und  sein  Führer  wandte  sich  zu 
ihm  um.  Seit  3000  Jahren  war  er  der 
erste  Besucher  der  Burg,  und  sein 
Führer  bat  ihn  inbrünstig,  alles  zu 
versuchen,  ein  verstecktes  Zauber¬ 
buch  zu  finden,  mit  dessen  Hilfe  er, 
der  einstige  Meistermagier  der  Burg, 
in  der  Lage  wäre,  den  Fluch  zu  bre¬ 
chen.  Kaum  hatte  der  Alte  dies  gesagt, 
begann  er  auch  schon  langsam  zu 
verschwinden.  Ratlos,  mit  tausend 
unbeantworteten  Fragen,  blieb  unser 
Held  alleine  auf  Burg  Avar  zurück. 
Alleine...? 


Bo  Janeborg,  der  Autor  dieses  Pro¬ 
grammes,  hat  sich  seine  ersten  Lor¬ 
beeren  mit  dem  Grafikprogramm  "The 
Artist”  verdient.  Daß  er  in  punkto 
Grafik  einiges  auf  dem  Kasten  hat. 
davon  legt  "Fairlight”  recht  deutlich 
Zeugnis  ab.  In  einem  Szenario,  das 
an  das  klassische  Ultimate-3D- 
Konzept  angelehnt  ist,  muß  der  Spie¬ 
ler  die  Rolle  des  jungen  Helden  über¬ 
nehmen.  Am  Anfang  steht  natürlich 
zuerst  einmal  eine  eingehende  Son¬ 
dierung  des  Terrains,  wobei  es  recht 
sinnvoll  ist,  sich  eine  Karte  von  der 
Burg  zu  zeichnen.  In  einigen  Bildern 
treiben  sich  allerlei  Unholde  herum, 
mit  denen  man  fertig  werden  muß.  Al¬ 
lerdings  ist  ein  endgültiges  Ausschal¬ 
ten  der  Wächter  nicht  möglich,  denn 
von  einem  Erschlagenen  bleibt 
immer  der  Helm  zurück,  aus  dem 
sich  bei  erneutem  Betreten  des  Rau¬ 
mes  ein  neuer  Krieger  entwickelt. 
Bemerkenswert  ist  an  "Fairlight”,  daß 
die  Spielfigur  zwar  fünf  Taschen  hat 
und  demnach  auch  fünf  Gegen¬ 
stände  gleichzeitig  tragen  kann.  Al¬ 
lerdings  richtet  sich  das  Volumen  der 
mitgeführten  Gegenstände  auch  nach 
dem  Gewicht  der  einzelnen  Dinge.  So 
ist  es  beispielsweise  nicht  möglich. 


zwei  schwere  Fässer  gleichzeitig  zu 
tragen,  sie  sind  dafür  ganz  einfach  zu 
schwer.  Ab  und  an  kommt  man  in 
diesem  Spiel  in  Räume,  in  denen  sich 
wichtige  Gegenstände  in  scheinbar 
unerreichbarer  Höhe  befinden.  Um 
an  diese  Items  zu  kommen,  muß  man 
sich  erst  einmal  einen  Tritt  bauen, 
über  den  man  dann  an  das  begehrte 
Gut  gelangt. 

Allerlei  herumliegende  Dinge  ver¬ 
mitteln  den  Eindruck,  daß  sich  in 
"Fairlight”  so  manches  Rätsel  ver¬ 
birgt.  Zwar  ist  es  mir  gelungen,  einen 
recht  großen  Teil  (?)  des  Spielfeldes 
zu  erkunden  und  an  manche  an  er¬ 
schwerenden  Stellen  postierte  Ge¬ 
genstände  heranzukommen,  aller¬ 
dings  gibt  "Fairlight”  mir  immer 
noch  eine  ganze  Menge  Rätsel  auf. 
Mit  "Fairlight”  hat  die  Phalanx  der 
Arcade-Adventures  auf  den  CPCs 
eine  nicht  zu  unterschätzende  Ver¬ 
stärkung  bekommen.  Bestechend 
durch  seine  gekonnte  Mischung  aus 
Abenteuer  und  Geschicklichkeit,  die 
von  einer  guten  Grafik  und  einem 
sehr  passenden  Musikstück  unter¬ 
malt  wird,  hebt  sich  "Fairlight”  deut¬ 
lich  vom  üblichen  Durchschnitt  ab. 
Es  ist,  so  kann  man  sagen,  jeden 
Pfennig,  den  es  kostet,  wert.  (HS) 
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Bomb  Jack 

Hersteller:  Elite  Systems 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca.  35,-  DM 

CPC  464  B  CPC  664  B  CPC  6128  25 


Bomb  Jack’s  Abgabe 
besteht  darin,  einige 
bedeutende  Bau¬ 
denkmäler  vor  Spreng¬ 
stoffanschlägen  zu  be¬ 
schützen.  Umher¬ 
schwirrende  Vögel  und 
seltsame  Astronauten 
versuchen  ihn  dabei  zu 
behindern.  Aber  Jack 
ist  kein  normaler 
Sprengstoffspezialist. 
Er  kann  gewaltige 
Sätze  machen  und  ist 
in  ein  Cape  gekleidet, 
das  ihn  eher  wie  Super¬ 
manns  kleinen  Bruder 
aussehen  läßt ■  Ein 
hochkarätiges  Arcade- 
Spiel,  das  eine  ganze 
Menge  Geschicklich¬ 
keit  erfordert. 
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Dies  ist  die  Geschichte  vom  Bomben- 
Jakob,  dessen  Aufgabe  es  ist,  alle 
möglichen  historischen  Baudenkmä¬ 
ler  vor  Bombenanschlägen  zu  be¬ 
wahren. 

Basierend  auf  dieser  recht  dünnen 
Rahmenhandlung  geht  es  bei  ”Bomb 
Jack”  auch  gleich  zur  Sache.  Jack,  der 
Bombenspezialist,  der  außer  seinen 
Kenntnissen  im  Entschärfen  explosi¬ 
ver  Gegenstände  auch  noch  über  eine 
enorme  Sprungkraft  verfügt,  be¬ 
kommt  den  Auftrag,  die  eingangs  er¬ 
wähnten  Bauten  vor  Attentaten  zu 
bewahren.  Auf  dem  Monitor  aller¬ 
dings  sieht  das  alles  ein  wenig  ab¬ 
strakter  aus,  als  es  sich  anhört.  Denn 
die  Gebäude,  die  zu  beschützen  seine 
Aufgabe  ist,  stellen  sich  lediglich  als 
Hintergrundgrafiken  dar.  Umher¬ 
hüpfen  und  Sprengkörper  entschär¬ 
fen  muß  er  dann  jeweils  auf  einem 
Plattformsystem,  das  das  eigentliche 
Spielfeld  darstellt  und  im  Vor¬ 
dergrund  des  Monitors  steht. 

Zu  Beginn  einer  jeden  Runde  ist  Jack 
alleine  auf  dem  Screen,  nur  ein  Vogel, 
der  eher  wie  ein  prähistorischer  Pter- 
odaktylus  aussieht,  zieht  einsam 
seine  Kreise  und  versucht,  Jack  zu 
kriegen.  Doch  dies  ändert  sich  bereits 
nach  wenigen  Minuten,  denn  dann 
erscheinen,  zumeist  in  der  linken 
oberen  Ecke,  nacheinander  einige 
Astronauten  (auf  jeden  Fall  sehen  die 
Kerle  wie  Astronauten  aus),  die  be¬ 
strebt  sind,  nach  einigem  Hin-  und 
Herlaufen  auf  den  Boden  des  Spiel¬ 
feldes  zu  gelangen.  Ist  ihnen  dies  erst 
einmal  gelungen,  verwandeln  sie  sich 
in  eigenartige  "Fliege-Dinger”.  Diese 
schwirren  dann  umher  und  versu¬ 
chen,  Jack  zur  Strecke  zu  bringen. 
Also,  eines  merkt  man  "Bomb  Jack” 
sofort  an,  nämlich,  daß  es  sich  hierbei 
um  eine  Umsetzung  eines  Spielhal- 
len-Hits  handelt  ”Bomb  Jack”,  das 
eigentlich  von  Tehkan  stammt,  ist 
von  Elite  in  Lizenz  für  Homecompu¬ 


ter  realisiert  worden.  Im  großen  und 
ganzen  kann  diese  Umsetzung  für 
den  CPC  als  gelungen  bezeichnet 
werden.  Aber  was  auch  hier  wieder 
klar  wird,  ist  ein  elementarer  Unter¬ 
schied  zwischen  sogenannten  ”Coin 
up’s”  und  speziellen  Homecomputer¬ 
spielen.  Während  man  auf  speziell 
für  Homecomputer  geschriebenen 
Spielen  eher  auf  eine  große  Spielmo¬ 
tivation  durch  Puzzles  oder  Denkauf¬ 
gaben  setzt  (die  Flut  von  Arcade- 
Adventures,  die  uns  in  letzter  Zeit  er¬ 
reichen,  legen  davon  Zeugnis  ab), 
geht  es  bei  den  ”Coin  up's”  im  Gegen¬ 
satz  dazu  hauptsächlich  um  Ge¬ 
schicklichkeit,  die  sich  dann  in  einem 
entsprechend  hohen  Score  nieder¬ 
schlägt.  Und  so  ist  es  dann  auch  bei 
der  CPC-Version  von  ”Bomb  Jack”. 


Ganz  wie  bei  einem  Spielhallen- 
Automaten  werden  die  Kontrahenten 
von  Runde  zu  Runde  aggressiver  und 
beweglicher.  Ist  es  einem  dann  gelun¬ 
gen,  fünf  oder  sechs  Runden  zu  über¬ 
leben,  gelangt  man  in  soetwas  wie 
eine  Bonusrunde,  in  der  man  zur  Ab¬ 
wechslung  einmal  keine  Nobelhütte 
beschützen  muß;  vielmehr  sind  in 
diesem  Falle  einzig  und  alleine  einige 
Bomben  zu  entschärfen.  Hat  man 
dies  dann  auch  akkurat  erledigt,  be¬ 
ginnt  der  Tanz  von  neuem.  Mit  einem 
leicht  veränderten  Plattformsystem 
und  demselben  Hintergrund,  den 
auch  das  erste  Level  aufweist. 

Zieht  man  in  Betracht,  daß  es  sich  bei 
”Bomb  Jack”  eigentlich  um  einen 
Spielhallen-Automaten  handelt,  muß 
man  den  Programmierern  von  Elite 
ein  Lob  aussprechen!  Zwar  ist  es  keine 


Wenn  es  Nacht  wird 
über  Gotham  City  zit¬ 
tern  alle  Verbrecher 
vor  einem  Mann:  vor 
Batman.  Aber  auch 
dieser  edle  Retter,  der 
in  Notgeratenen,  hat 
seine  Feinde.  Als  er 
eines  Tages  in  seinen 
geheimen  Unterschlupf, 
die  Bathöhle,  zurück¬ 
kehrt,  wird  er  gewahr, 
daß  sein  Batmobil  ver¬ 
schwunden  ist.  Er  weiß, 
daß  Gefahr  im  Verzüge 
ist.  Der  Joker  und  der 
Rätselmann  sind  in 
seine  Zuflucht  ein¬ 
gedrungen  und  haben 
überall  in  der  Bathöhle 
gefährliche  Fallen  auf¬ 
gestellt. 


Eins-zu-Eins-Wiedergabe  geworden, 
hat  aber  alles  in  allem  seine  Reize. 
Abgesehen  davon  werden  mir  Spiele, 
bei  denen  es  ausschließlich  um  mög¬ 
lichst  hohe  Scores  geht,  zumeist  recht 
schnell  langweilig.  Denn  alles  in  al¬ 
lem  ist's  doch  ein  wenig  dünne,  was 
sich  da  an  Handlung  auf  dem  Monitor 
abspielt.  (HS) 

Batman 

Hersteller:  Ocean 

Vertrieb:  Fachhandel 

Streuerung:  Joystick/Tastatur 

Monitor:  Farbe/Grün 

Programm:  M-Code 

Preis:  ca.  39,-  DM 

CPC  464  B  CPC  664  8  CPC  6128  K 

Wenn  es  Nacht  wird  über  Gotham 
City,  zittert  die  gesamte  Unterwelt  vor 
einem  einzigen  Mann,  vor  Batman, 
dem  maskierten  Verbrecher-Jäger. 
Batman,  dessen  Revier  eigentlich  die 
Comic  Books  sind,  hat  nach  einigem. 
Hin  und  Her  um  die  Rechte,  seinen 
Weg  in  die  Heimcomputer  gefun¬ 
den. 

Dies  hätte  sich  der  inzwischen  ver¬ 
storbene  Erfinder  des  Superdetektivs 
im  Fledermauskostüm,  Bob  Kane, 
wohl  niemals  träumen  lassen,  als  er 
1939  die  erste  Story  um  den  "Caped 
Crusader”  zeichnete.  Seither  hat  Bat¬ 
man  in  einer  unüberschaubaren  Men¬ 
ge  von  Comics  seinen  heldenhaften 
Kampf  gegen  das  Böse  in  jedweder 
Erscheinungsform  geführt. 

Als  Held  seiner  eigenen  Serie  und  als 
Gaststar  in  den  Serien  anderer  Super¬ 
helden  der  amerikanischen  Comic 
Verlags  DC,  schlug  er  sich  mit  Ver¬ 
brechern,  bösen  außerirdischen  Inva¬ 
soren  und  ähnlichem  Volk  herum. 
Auch  ist  schon  einige  Male  versucht 
worden,  seine  Abenteuer  für  das  Kino 
und  das  Fernsehen  in  eine  geeignete 
Form  zu  bringen,  allerdings  kann  man 
diese  Produkte,  abgesehen  von  eini¬ 
gen  Zeichentrickfilmen,  getrost  außer 
Acht  lassen.  Sie  sind  inhaltlich  wie 
qualitativ  indiskutabel. 

Dieses  gilt  allerdings  nur  für  die 
Kinoexkursionen,  auf  die  Batman  ge¬ 
schickt  wurde.  Das  Spiel,  in  dem  er 
nun  auch  auf  Ihrem  heimischen  CPC 
seine  Abenteuer  erlebt,  gehört  zu  den 
interessantesten  Neuerscheinungen 
der  letzten  Monate. 

Die  Geschichte  beginnt,  als  Batman 
nach  einem  seiner  nächtlichen  Ein¬ 
sätze  in  seinen  versteckten  Schlupf¬ 
winkel,  die  sogenannte  Bathöhle,  heim¬ 
kehrt,  um  sich  dort  in  seine  bürgerli¬ 
che  Erscheinung  als  Playboy  Bruce 
Wayne  zurückzuverwandeln.  Kaum 
ist  er  in  seiner  unterirdischen  Festung 
angelangt,  muß  er  feststellen,  daß 
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zwei  seiner  ältesten  und  gefährlich¬ 
sten  Gegner  in  die  Bathöhle  ein¬ 
gedrungen  sind,  und  dort  so  ziemlich 
alles  auf  den  Kopf  gestellt  haben.  Al¬ 
lerorten  haben  der  Joker  und  der 
Rätselmeister  greuliche,  ungeheuere 
und  teuflische  Fallen  installiert 
Batmans  Aufgabe  besteht  nun  darin, 
zuerst  seiner  Ausrüstung  habhaft  zu 
werden  und  dann  die  verstreut  herum¬ 
liegenden  Teile  seines  Batmobils  zu 
finden,  um  dasselbe  wieder  zusammen¬ 
zubauen. 

In  seinem  diagonalem  Draufsicht- 
Display  erinnert  Batman  ein  wenig 
an  die  wohlbekannten  Ultimate 
Spiele  (die  sind  zwar  beileibe  nicht 
die  einzigen,  die  solche  Spiele  herstel- 
len,  aber  sie  waren  immer  noch  die  er¬ 
sten),  und  doch  gibt  es  einige  grund¬ 
sätzliche  Unterschiede  zur  breiten 
Masse.  Zuallererst  wäre  da  die  ausge¬ 
zeichnete  Grafik  zu  erwähnen,  die 
zwar  im  Mode  2  programmiert  wurde 
und  daher  auch  nur  über  vier  Farben 
verfügt,  aber  wirklich  so  geschickt  ge¬ 
staltet  wurde,  daß  man  manchmal  an¬ 
fängt  die  Farben  zu  zählen,  weil  das, 
was  sich  da  auf  dem  Monitor  in  den 
grellsten  Popfarben  darstellt,  nicht  so 
aussieht  als  sei  es  mit  nur  vier  Farben 
programmiert.  Ansonsten  folgt  aller¬ 
dings  auch  Batman  dem  altherge¬ 
brachten  Ultimate-Arcade- Abenteuer- 
Konzept. 

Über  verschwindende  Blöcke,  an 
Rollbändern  vorbei,  durch  Räume,  in 
denen  sich  alles  mögliche  Ungeziefer 
versammelt  hat,  führt  der  Weg  durch 
die  150  verschiedenen  Zimmer  der 
unterirdischen  Feste. 

Ausgesprochen  positiv  ist  mir  in  die¬ 
sem  Zusammenhang  der  Schwierig¬ 
keitsgrad  von  Batman  aufgefallen. 
Zwar  sind  auch  hier  in  manchen 
Räumen  pixelgenaue  Sprünge  ange¬ 
sagt,  aber  die  sind  nicht  so  oft  zu  fin¬ 
den,  vielmehr  ist  es  mir  bereits  nach 
wenigen  Versuchen  gelungen,  mehr 
als  50  Räume  zu  erkunden,  Batmans 


gesamte  Ausrüstung  einzusammeln 
und  zumindest  den  Standort  eines 
der  verborgenen  Batmobil-Teile  zu 
lokalisieren. 

Zwei  Features  hat  Batman  noch,  die 
es  ebenfalls  aus  der  Masse  der 
Spielprogramme  hervorheben.  Zum 
einen  ist  da  die  Möglichkeit,  das  Spiel 
an  sogenannten  Speichermodulen, 
die  überall  verteilt  herumliegen,  ab¬ 
speichern  zu  lassen,  um  später  (das 
heißt  im  darauffolgenden  Spiel)  an 
eben  dieser  Stelle  wieder  anzufangen. 
Dieses  Speichern  ist  rein  software- 
mäßig  zu  sehen,  denn  eine  Möglich¬ 
keit,  das  Spiel  auf  Kassette  oder 
Diskette  zu  speichern,  gibt  es  nicht. 
Die  andere  positive  Neuigkeit  ist  das 
Hundeleben.  Stellen  Sie  sich  ein¬ 
mal  folgende  Situation  vor:  Sie  haben 
60  Räume  erforscht  und  nur  noch  ein 
Leben,  als  plötzlich  vor  Ihnen  im 
nächten  Zimmer  ein  Extraleben 
steht.  Sie  rennen  darauf  zu  und ....  Sie 
sind  zu  hektisch  und  rennen  von  der 
sicheren  Plattform  herunter  und 
spießen  sich  auf  langen  Pfählen  auf. 
Spiel  vorbei,  jetzt  kann  man  sich  nur 
noch  ärgern.  Bei  Batman  kann  es  al¬ 
lerdings  passieren,  daß  Sie  auf  einmal 
Batman  zusammen  mit  einer  Bull¬ 


dogge  auf  dem  Monitor  sehen,  unter¬ 
malt  von  dem  Schriftzug  ”DOGS 
LIFE”,  ein  außerordentliches  Extrale¬ 
ben,  in  dessen  Genuß  Sie  nun  gelan¬ 
gen. 

Rundherum  empfehlenswert,  nicht 
zu  schwierig,  gewürzt  mit  einer  sehr 
großen  Spielmotivation,  mit  feinen 
Grafiken  garniert,  ist  Batman  ein 
echter  Leckerbissen.  (HS) 


Commando 

Hersteller:  Elite  Systems 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
'■Preis:  ca.  33,-  DM 

CPC  464  H  CPC  664  8t  CPC  6128  8 

Seit  einiger  Zeit  scheinen  genau  die¬ 
jenigen  Spiele  eine  enorme  Renais¬ 
sance  zu  haben,  die  schon  zu  ihren 
goldenen  Zeiten  so  manche  Diskus¬ 
sion  hervorriefen.  ”Back  again” 
könnte  man  sagen,  denn  die  Baller¬ 
spiele  haben  wieder  Konjunktur.  Al¬ 
lerdings,  waren  es  beim  ersten  Boom 
hauptsächlich  die  Raumschiffe  gar¬ 
stiger  Invasoren,  die  im  Laserfeuer 
verglühten,  hat  man  sich  nun  darauf 
spezialisiert,  die  Spielfiguren  auf 
Mutter  Erde  anzusiedeln.  So  sind  es 
dann  auch  Menschen,  die  sich  da  ge¬ 
genseitig  niedermetzeln.  Eine  ganze 
Reihe  von  Spielen  lassen  einen 
Rambo-artigen  Charakter  durch  die 
Gegend  laufen  und  alles  nieder¬ 
schießen,  was  sich  bewegt  (nicht  von 
ungefähr  heißt  auch  eines  dieser 
Spiele  ”Rambo”).  Zwar  bemühte  man 
sich  bei  der  Anleitung  von  ”Com- 
mando”  klar  zu  machen,  daß  es  sich 
nicht  um  Menschen  handelt,  die  da 
ins  Gras  beißen,  trotzdem  sind  die 
Kerle  angezogen  wie  sich  im  allge¬ 
meinen  ein  Soldat  zu  kleiden  pflegt. 
Ziel  des  Spieles  ist  es,  durch  ein  verti¬ 
kal  am  Monitor  vorbeiscrollendes 
Areal,  das  natürlich  auf  s  Schwerste 
von  den  "Außerirdischen”  bewacht 
wird,  bis  zu  einer  Zentralbasis  vor¬ 
zudringen  und  die  dort  stationierten 
Soldaten  -  pardon  -  Außerirdischen 
abzumurksen.  Ob  das  nun  mit  der 
ausgezeichnet  funktionierenden  Ma¬ 
schinenpistole  oder  via  Handgra¬ 
nate  geschieht,  bleibt  sich  im  Resultat 
gleich. 


Selbstbau-Plotter 

PL22/B 

Geschwindigkeit  max.  60  mm/s  -  Auflösung  0,06  mm 
Genauigkeit  besser  0,09  mm  -  Format  DIN  A3 
Mechanik:  Ganzmetall,  Linearkugellager,  Schrittmotore, 
Zahnriemen,  höchste  Präzision,  robuste  Ausführung 
Prozessor  hochintelligenter  Z80-Rechner,  Centronics-Schnittsteile 
Software:  im  16K-EPROM,  441!  neue  Plottbefehle,  z.B.:  3D-Grafik, 
3  Schriftsätze,  2-typen,  Interpolation  Zoomen,  relatives/absolutes 
Positionieren  usw... 

Weiteres:  Gehäuse,  Zeichenwerkzeuge,  Netzteil  usw. 

Preis:  Immer  noch  nur  61 9,95  DM  (Mechanikbausatz) 
Neugierig  geworden?  -  Info  gegen  DM  1,60  in  Briefmarken  bei 

Walter  Kopisch 

Plotter-  und  Grafiksysteme  -  Hard-  und  Software - 
Buchbergstraße  37  -  D-7712  Blumberg  1 


•Software  im  ROM* 

Software  nie  mehr  laben  -  Fast  IOC  %  freier  Speicher  im  CPC  1 1 ! 

UTOPIA  (Amor  Ltd) 

52  Routinen,  die  eine  »ehre  Hille  für  jeden  CPC*Anwfinder  darsletlen  II. a  vollständiger  Oiskertcninnottot,  Uiskeuenspeoler,  Oiskettentormatie 
lung.  Hardcopytojlinen  und  jede  Menge  Befehle,  die  manches  Problem  rum  Kinderspiel  werden  lassen,  (siehe  Software  Reviews  CPC  Int.  5J61 

EPR0M119.-  0M 

MAXAM  (Autor  Ltd)  "Assembler  *  Monitor  *  Editor  * 

Ern  ZBU  Entwicklungssystem,  das  Profiansprüchei  gerecht  vr  rd  '  Hybride  Basic/Mischiincode-Progrexm  möglich  *  Qual  ende  kann  als  Teil 
eines  Basic  Programms  emgegeban  werden  '  *  bedingte  Assemblierung  "  "  eile  Sieidardinsiruklionen  ssgl  einiger  Variationen  *  einfaches 
Ofhijgiivj  *  Full-Screen  Feilen  *  viele  hilfreiche  Ulililies  *  0  e  ansgereichneto  Menuofithrung  laßt  fl3s  50-seitiga  deutsche  Handbuch  lasl 
siiftfiuing  weiden,  (stehe  auch  Testbericht  c’l  4  .RS! 

CassB9,-DM  Disk.  109,  -  OM  EPROM169.-OM  HOM-Modul  233,-  OM 

PHOTEXT  (Arnor  Lid) 

Komlurlable  Texlvcrarbehung  mil  einfachster  Bedienung  Eormatkrungs  u  fcditirrmöglichkeilen.  Block  veischiebungen,  Tabulatoren.  Suchen  und 
Ersetzen.  Ookumontemuode.  Kopt  o  FulUeilen,  Zeilertumbruch.  Druckeisteuereeichen.  deutscher  7e*eherKar7  u  v  a  m 

Alle  Prenssirmr  100  ¥.  Maschinencude  I  <  EPR0M  101.-  0M 

*  EPROM-KARTE  0  -  64  K  0  •  (CPC  464/664) 

0  freie  Stärkerem  für  d«e  geng.|eii  (PROM  tVPf  «I  7?M  und  2M20  Qlirceprfuhmi  trennarung.hu  l  CPC  «641 

129.-  0M  (CPC  4M) 
149.-  DM  (CPC  6641 

Fordarn  Sie  ausführliche  Informationen  gegen  1,  •  DM  Puno  an. 

Preise  irgl  5,  DM  Versandkosteriameil  Ab  300.  0M  verwndkoslenfrei 
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Eine  mehr  als  mittelmäßige  Grafik, 
ein  wenig  besserer  Sound  und  ein 
nicht  vorhandener  Spielwitz  lassen 
das  Spiel  in  meinen  Augen  als  in¬ 
diskutabel  erscheinen.  Mitunter  mag's 
dem  einen  oder  anderen  doch  gefal¬ 
len.  Aber  reines  Leute-erschießen, 
und  dann  nicht  einmal  das  gnädige 
Deckmäntelchen  des  Strategiespiels 
umzuhängen,  das  ist  fast  schon 
dreist. 

(HS) 
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Movie 

Hersteller:  Imagine 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca.  35,-  DM 

CPC  464  »  CPC  664  JS  CPC  6128  8 


Martialische  Gefechte, 
MG-Feuer  und  Hand¬ 
granatenexplosionen 
stehen  im  Mittelpunkt 
dieses  fast  schon  ge¬ 
schmacklosen  Pro¬ 
gramms.  Zwar  bemüht 
sich  die  Anleitung  klar¬ 
zumachen,  daß  die  Ge¬ 
stalten,  die  man  nieder¬ 
zuschießen  hat,  böse 
Invasoren  aus  dem  All 
sind.  Trotzdem  bleibt 
bei  diesem  Spiel  ein 
recht  schaler  Nachge¬ 
schmack  zurück. 

Leute  totschießen  ist 
halt  doch  nicht  jeder¬ 
manns  Sache. 


Bourbon  ein,  und  lehnt  sich  zurück  in 
seinen  harten  Bürostuhl.  Wenn  Bugs 
mitbekommt,  daß  J ack  hinter  ihm  her 
ist,  wäre  sein  Leben  keine  10  Cent 
wert.  Die  einzige  Möglichkeit,  unbe¬ 
merkt  nahe  genug  an  ihn  heranzu¬ 
kommen,  sei  die  Zwillingsschwester 
von  Malloys  Freundin.  Jack  steckte 
sich  eine  Lucky  Strike,  natürlich 
ohne  Filter,  in  sein  immer  noch  grin¬ 
sendes  Gesicht.  -  Je  mehr  er  darüber 
nachdachte,  desto  besser  gefiel  ihm 
der  Auftrag.  Und  als  ihn  im  nächsten 
Moment  ein  starker  Hustenanfall 


feststellen,  daß  Bugs  ihm  um  einiges 
voraus  ist.  Dieser  hat  nämlich  seinen 
Auftraggeber  beschatten  lassen,  und 
hat  auf  diese  Art  und  Weise  Wind  von 
der  ganzen  Angelegenheit  bekom¬ 
men.  Als  Jack  nun  vor  die  Tür  seines 
Büros  tritt,  muß  er  feststellen,  daß  dort 
bereits  einige  finstere  Typen  herum¬ 
lungern.  Und  in  diesem  Zusammen¬ 
hang  bedarf  es  keiner  besonders 
großen  Intelligenz,  um  sich  auszu¬ 
rechnen,  daß  die  Kerle  hinter  Jack  her 
sind.  Mit  knapper  Not  gelingt  es  Jack 
den  Verbrechern  zu  entkommen  und 


New  York  1933.  Der  Privatdetektiv 
Jack  Marlow  sitzt  in  seiner  Kanzlei 
und  denkt  über  den  Auftrag  nach, 
den  ihm  vor  wenigen  Minuten  ein  äl¬ 
terer  Herr  ange boten  hat.  Sicherlich 
ist  es  richtig,  daß  Jack  momentan  in 
einer  finanziellen  Zwangslage  steckt, 
auch  richtig  ist,  daß  der  angebotene 
Auftrag  sehr  lukrativ  zu  sein  scheint  - 
aber  auch  sehr  gefährlich.  Bugs 
Malloy,  eine  der  imposantesten  Unter¬ 
weltgrößen,  wäre  das  Ziel  seiner  Er¬ 
mittlungen,  sollte  er  sich  wirklich 
überwinden  können,  den  Auftrag  an¬ 
zunehmen.  Leicht  säuerlich  grinsend 
schenkt  sich  Jack  noch  ein  Glas 


heimsuchte,  dachte  er:  „Besser  auf 
Gangsterjagd  ins  Gras  beißen,  als  an 
Lungenkrebs  zugrunde  gehen”. 
Sicherlich  werden  Sie  mir  beipflich- 
ten,  daß  sich  die  eben  erzählte  Ge¬ 
schichte  wie  der  Plot  eines  Gangster¬ 
filmes  anhört.  Daß  dies  nicht  von 
ungefähr  kommt,  erkennt  man,  so¬ 
bald  man  sich  die  Mühe  macht  und 
MOVIE  einer  eingehenderen  Unter¬ 
suchung  unterzieht.  Denn  wie  in  den 
schönen  alten  Filmen  geht  es  auch 
hier  gleich  zur  Sache.  Natürlich  ent¬ 
schließt  sich  Jack  dazu,  den  Auftrag 
anzunehmen.  Kaum  hat  er  sein  Büro 
verlassen,  muß  er  aber  auch  schon 


bis  zu  der  Zwillingsschwester  von 
Bugs  Freundin  zu  gelangen.  Aber 
damit  steht  Jack  erst  am  Anfang  aller 
Schwierigkeiten,  denn  auch  Bugs 
Freundin  ist  dort.  Jack  weiß  nun  beim 
besten  Willen  nicht,  wer  jetzt  wer  ist. 
Zumal  sich  beide  als  seine  Helferin 
ausgeben  und  beide  sich  gegenseitig 
bezichtigen,  die  böse  Schwester  zu 
sein.  Was  nun  Mr.  Marlow? 

Imagine  ist  ein  Softwarehaus,  um  das 
es  eine  ganze  Zeit  lang  still  gewesen 
ist.  Scheinbar  hatte  man  sich  bei  eini¬ 
gen  Projekten  ein  wenig  übernom¬ 
men.  Aber  wie  Phönix  aus  der  Asche 
sind  sie  wieder  da,  und  die  Programme, 
die  sie  aus  ihrer  Klausur  mitgebracht 
haben,  sind  -  anders  kann  man’s 
nicht  nennen  -  vom  Feinsten.  Movie 
erscheint  auf  den  ersten  Blick  im  fast 
schon  klassisch  zu  nennenden  Ulti- 
mate  Style,  das  heißt  3D,  Blickrich¬ 
tung  diagonal  von  oben.  Aber  es 
steckt  noch  einiges  mehr  in  diesem 
Spiel.  Oder  ist  Ihnen  schon  einmal 
ein  Arcade-Abenteuer  über  den  Weg 
gelaufen,  in  dem  Sie  sich  mit  den 
Spielfiguren  unterhalten  konnten? 
Bei  Movie  geht  das.  Am  unteren 
Rand  des  Monitors  befindet  sich  ein 
Menue  in  dem  neben  Optionen  wie 
"Gegenstand  aufnehmen”  oder  "Ge¬ 
genstand  hinlegen  "  auch  der  Menue- 
punkt  "Sprechen",  stilvoll  mit  einer 
Sprechblase  kenntlich  gemacht,  ent- 
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Movie  ist  wohl  der  er¬ 
ste  computerisierte  Film 
den  es  gibt.  Denn  nicht 
nur  von  der  Handlung 
her  wird  man  an  die 
guten  alten  Gangster¬ 
filme  aus  den  Dreißiger 
Jahren  erinnert.  Im 
klassischen  Ultimate- 
Gewand,  mit  3D-Gra- 
fiken  versehen,  geht  es 
in  Movie  um  das 
Unschädlichmachen 
einer  Unterweltgröße. 
Die  einzige  Person,  die 
Sam  Marlow  bei  seiner 
heiklen  Aufgabe  zur 
Seite  steht,  ist  ein  jun¬ 
ges  Mädchen.  Sie  ist 
die  Zwillingsschwester 
der  Freundin  des  ge¬ 
suchten  Gangsters. 
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halten  ist.  Zwar  ist  das  Vokabular  ein 
wenig  beschränkt  aber  bisweilen  ge¬ 
lingt  es,  recht  interessante  Gespräche 
zu  führen.  Das  Spielfeld,  in  dem  die 
ganze  Geschichte  stattfindet,  ist 
außerordentlich  groß.  Bei  meinen  er¬ 
sten  Versuchen  gelang  es  mir,  ca.  60 
Räume  zu  erkunden,  was  ungefähr 
30  %  des  gesamten  Terrains  aus¬ 
macht.  Aber  außer  der  interessanten 
Möglichkeit,  sich  mit  einzelnen  Spiel¬ 
figuren  zu  unterhalten,  besteht 
manchmal  die  Notwendigkeit  gewalttä¬ 
tiger  Auseinandersetzungen.  Entwe¬ 
der  kann  man  versuchen,  seinem 
Kontrahenten  die  Oberlippe  mit 
einem  Bluterguß  zu  verschönen,  oder 
aber  ihn  mittels  eines  Pistolenschus¬ 
ses  endgültig  außer  Gefecht  zu  set¬ 
zen. 

Movie  ist  ein  echter  Knaller,  der  hält, 
was  er  verspricht.  (HS) 


The  5th  Axis 

Hersteller:  Loricels 
Vertrieb:  Acti vision/Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  stand  bei  Redaktionsschluß 
noch  nicht  fest 

CPC  464  8  CPC  664  &CPC  6128  K 

Daß  aus  Frankreich  mehr  kommt  als 
gutes  Essen  und  Pernod,  konnten  Sie 
bereits  in  unserer  letzten  Ausgabe 
feststellen.  Dort  habe  ich  eines  der  er¬ 
sten  französischen  Programme,  die 
bis  zu  uns  nach  Deutschland  gelang¬ 
ten,  vorgestellt.  Daß  Frankreich  aber 
mehr  als  nur  ein  oder  zwei  gute 
Softwareautoren  zu  bieten  hat,  wird 
klar,  wenn  man  weiß,  daß  auch  dort 
einige  Softwarehäuser  in  einem  har¬ 
ten  Konkurrenzkampf  liegen.  Stellte 
ich  Ihnen  im  letzten  Heft  ein  Spiel 
von  ERE  Informatique  vor,  möchte 
ich  heute  einmal  ein  Produkt  eines 
anderen  Unternehmens  vorstellen. 
”The  5th  Axis”  stammt  von  Loricels 
und  erzählt  von  einem  peinlichen 
Zwischenfall  in  einem  (nee,  kein 
Atomkraftwerk)  Zeitlabor. 

Der  geniale  Wissenschaftler  Dr. 
Chronos  betreibt  seit  einiger  Zeit 
Versuche  mit  einer  Zeitmaschine. 
Dieses  Gerät  ist  zwar  noch  ein  Proto¬ 
typ,  verrichtet  seine  Aufgabe  aller¬ 
dings  zur  allgemeinen  Zufriedenheit. 


Erst  als  das  Ding  infolge  einer 
Fehlschaltung  und  der  darauffolgen¬ 
den  Überlastung  explodiert,  wird 
man  gewahr,  welche  Gefahren  Zeit¬ 
experimente  bergen.  Denn  die  Zeit¬ 
maschine  gibt  die  überschüssige 
Energie,  die  aus  der  Überlastung  re¬ 
sultiert,  an  Gegenstände  ab,  die  mit 
ihrer  Hilfe  aus  anderen  Zeitzonen 
herbeigeschafft  wurden.  Dies  hat  zur 
Folge,  daß  sich  um  jedes  Objekt  eine 
kleine,  aus  der  Streuenergie  gespeiste, 
separate  Zeitzone  bildet,  in  der  diesel¬ 
ben  Verhältnisse  herrschen,  wie  in 
der  Ursprungszone  des  jeweiligen 
Objektes.  Nun,  dadurch  ist  verständ¬ 
licherweise  im  Labor  des  Dr.  Chronos 
die  Hölle  los;  alle  möglichen  durch¬ 
einander  gewürfelten  Zonen  verän¬ 
dern  die  Realität  des  Labors.  Zu  al¬ 
lem  Überfluß  versagt  auch  noch  der 
Steuercomputer,  der  die  vielen  Hilfs¬ 
androiden,  die  sich  im  Labor  befin¬ 
den,  lenkt.  Als  die  instabile  Reali¬ 
tätszone  sich  auszubreiten  beginnt, 
bleibt  nur  noch  eine  Chance.  Jemand 
muß  in  das  Labor  Vordringen  und 
alle  Gegenstände  in  ihre  eigene  Zeit 
zurück  bringen. 

"The  5th  Axis”  beweist  auf  ein  Neues, 
daß  gute  Spiele  nicht  nur  aus  Eng¬ 
land  und  Amerika  kommen.  Der 
kleine  Selbstmörder,  der  durch  Dr. 
Chronos  Labor  hüpft  und  sich  mit 
den  amoklaufenden  Androiden  her¬ 
umreißt,  erinnert  von  der  Animation 
her  sehr  stark  an  die  bekannten 
Spiele  "Impossible  Mission”  und 
"Summer  Games"  (die  es  aber  bisher 
nur  für  den  C-64  gibt).  Die  fließenden 
Bewegungen,  mit  denen  sich  unser 
Zeitagent  durch  das  Labor  bewegt 
oder  die  Kämpfe  mit  den  Androiden, 
sind  wirklich  sehenswert. 

Das  Labor,  in  dem  die  ganze  Ge¬ 
schichte  stattfindet,  teilt  sich  in  fünf 
verschiedene  Stockwerke  auf,  denen 
ich  einmal  unterstelle,  daß  sie 
kreisrund  sind.  Denn  läuft  man 


immer  in  eine  Richtung,  gelangt  man 
nach  kurzer  Zeit  wieder  zum  Aus¬ 
gangspunkt  zurück.  Die  einzelnen 
Stockwerke  sind  immer  wieder  durch 
Öffnungen  unterbrochen.  Paßt  man 
nicht  auf,  stürzt  man  von  Stockwerk 
zu  Stockwerk  bis  zur  untersten  Ebene 
des  Labors.  Abgesehen  von  diesen 
fast  schon  als  Fallen  zu  bezeichnen¬ 
den  Löchern,  wimmeln  auch  noch 
jede  Menge  verschiedener  Androi¬ 
den  herum,  die  unserem  Helden 
nachstellen.  Ziel  ist  es,  die  durch  die 
Explosion  durch  das  ganze  Labor 
verstreuten  Gegenstände  einzusam¬ 
meln.  Außerden  findet  man  immer 
wieder  Schlüssel,  mit  deren  Hilfe 
man  Zeittore  öffnen  kann.  Ist  dies  erst 
einmal  gelungen,  besteht  die  Möglich¬ 
keit,  in  diese  Tore  einzudringen. 
Durch  lange  Korridore,  in  denen 
man  Speeren  oder  Schüssen  durch 
Springen  und  Ducken  ausweichen 
muß,  gelangt  man  dann  in  die  mit 
dem  Korridor  verbundene  Zeitzone. 
Dorthin  müssen  nun  die  Gegen¬ 
stände,  die  ursprünglich  von  dort 
stammen,  wieder  zurückgebracht 
werden. 

Das  Spielen  von  "The  5th  Axis"  ge¬ 
staltet  sich  auch  nach  einiger  Zeit 
immer  noch  recht  abwechslungs¬ 
reich.  Die  Grafik  des  Männchens 
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und  der  herumlaufenden  Roboter  ist 
ausgezeichnet  und  toll  animiert.  Bei 
den  Hintergründen  ist  das  nicht  so 
gelungen.  Wenn  sie  auch  sehr  detail¬ 
liert  sind,  wirken  sie  doch  an  einigen 
Stellen  ein  wenig  popelig. 

Aber  auch  damit  kann  man  leben, 
und  das  nicht  schlecht.  (HS) 


Aufregung  in  den  La¬ 
bors  des  Dr.  Chronos. 
Einige  seiner  Zeitexpe¬ 
rimente  sind  mißglückt 
und  haben  ungeahnte 
Folgen.  Durch  den 
Einfluß  anderer  Zeit¬ 
zonen  beginnt  sich  die 
Realität  in  dem  Labor 
zu  verändern. 

Alle  Gegenstände,  die 
nicht  aus  der  Jetztzeit 
stammen,  müssen  wie¬ 
der  in  ihre  angestamm¬ 
ten  Zonen  zurück¬ 
gebracht  werden.  An¬ 
derenfalls  besteht  die 
Gefahr,  daji  sich  die 
Region  mit  veränderter 
Realität  über  die  ganze 
Erde  ausbreitet. 
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Monty  on  the  Run 

Hersteller:  Gremlin  Graphics 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  Cass.35,-,  Disk.  47,-  DM 

CPC  464  8  CPC  664  □  CPC  6128  □ 

Das  erste  Abenteuer,  das  Monty  Mole 
zu  bestehen  hatte,  fand  zu  Zeiten  des 
großen  englischen  Bergarbeiterstreiks 
statt.  Monty,  ein  Maulwurf  mit  ge¬ 
werkschaftlichen  Ambitionen,  wird 
von  seinem  Ober-Gewerkschaftsboss, 
Arthur  Scargill,  damit  beauftragt,  in 
eine  Zeche  einzudringen.  Da  auf  die¬ 
ser  Zeche  nur  Streikbrecher  arbeiten, 
soll  Monty  deren  Namen  festhalten. 
Allerdings  wurde  er,  bei  dem  Versuch 
über  stillgelegte  Tunnel  und  Stollen 
in  das  Bergwerk  einzudringen,  von 
der  Polizei  festgenommen.  Nachdem 
man  ihn  in  einer  kurzen  und  unge¬ 
rechten  Gerichtsverhandlung  verur¬ 
teilt  hat,  wird  Monty  ins  Gefängnis 
geworfen.  Dieser  aber  fühlt  sich 
unschuldig  und  versucht,  aus  dem 
Gefängnis  zu  entkommen. 

Dies  ist  die  Geschichte  von  Monty 
Mole,  wie  sie  in  den  ersten  beiden  Tei¬ 
len  des  Spieles  ”Monty  Mole”  und 
"Monty  is  Innocent”  erzählt  wird.  Im 
nun  auch  für  den  CPC  vorliegenden 
dritten,  und  vorerst  letzten  Teil  der 
Story,  ist  Monty  auf  der  Flucht.  Wie 
schon  beim  guten  alten  "Manie 
Miner"  muß  er  sich  durch  eine  Viel¬ 
zahl  verschiedener  Räume  seinen 
Weg  in  die  Freiheit  erkämpfen.  Im  gan¬ 
zen  Spiel  wimmelt  es  nur  so  von 
irrwitzigen  Gestalten,  die  überall  ihr 
Unwesen  treiben  und  versuchen, 
Montys  Flucht  zu  vereiteln.  Während 
Monty  durch  die  einzelnen  Zimmer 
rennt,  wird  er,  wie  das  bei  Program¬ 
men  von  Gremlin  Graphics  fast 
schon  Standard  ist,  von  einem  fetzi¬ 
gen  Thema  begleitet.  Der  Sound  ist 
auch  hier  wieder  brilliant.  Auch  die 
Grafik  des  Spieles  überzeugt  auf  An¬ 
hieb.  Wenn  auch  der  Spielgedanke 
nicht  gerade  auf  neuesten  Ideen  be¬ 
ruht,  ist  es  doch  gelungen,  ein  Spiel 
von  außerordentlicher  Qualität  zu  er¬ 
stellen.  Zwar  ist  es  mir  bisher  erst  ge¬ 
lungen,  etwa  15  verschiedene  Räume 
zu  besuchen,  doch  laut  Hersteller 
sind  da  noch  eine  Vielzahl  anderer 
Räume,  in  die  ich  bisher  noch  nicht 
gelangt  bin.  Und  um  auch  eimal  dar¬ 
über  zu  sprechen:  Leicht  ist  "Monty  on 
the  Run”  nicht  gerade. 

Sicherlich  wird  es  eine  ganze  Weile 
dauern,  bis  ein  geneigter  Spieler  es  ge¬ 
schafft  hat,  dieses  Spiel  einmal  ganz 
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Monty  Mole  wurde 
unschuldig  verurteilt 
und  eingesperrt.  Dies 
erregte  natürlich  sein 
Mißfallen  und  so  floh 
er  aus  der  schwer  be¬ 
wachten  Strafanstalt. 
Nun  gilt  es.  durch  ein 
ausgedehntes  unterir¬ 
disches  Gängesystem 
zu  entkommen.  "Monty 
on  the  Run"  ist  eines 
der  feinsten  Jump  & 
Run-Spiele  der  letzten 
Monate.  Durch  49  Bil¬ 
der,  die  von  Mal  zu 
Mal  schwerer  werden, 
fiihrt  der  Weg  in  die 
Freiheit. 


durchzuspielen.  Aber  man  hat,  im 
Gegensatz  zu  "Manie  Miner”,  die 
Möglichkeit,  zwischen  den  einzelnen 
Räumen  hin  und  her  zu  marschieren, 
ohne  zuerst  alle  im  jeweiligen  Raum 
verteilten  Gegenstände  einzusam¬ 
meln.  Dies  ist  durchaus  von  Vorteil, 
da  man  sehr  leicht  die  Lust  am 
Weiterspielen  verliert,  wenn  man 
immer  an  ein  und  demselben  Pro¬ 
blem  festhängt,  Bei  "Monty  on  the 
Run”  sucht  man  sich  einfach  eine  an¬ 
dere  Abzweigung,  und  geht  an  ande¬ 
rer  Stelle  ein  neues  Problem  an,  mit 
dem  man  eventuell  ein  wenig  besser 
klar  kommt. 

Bestimmt  hat  fast  jeder,  der  einen 
Homecomputer  zuhause  stehen  hat, 
schon  einmal  einen  Manie  Miner- 
Verschnitt  (oder  gar  das  Orginal)  ge¬ 
spielt  oder  gesehen.  Wer  sich  mit 
Wonne  an  diese  Spiele  erinnert  und 
bei  sich  eine  Neigung  für  derartige 
Spiele  feststellt,  ist  auch  mit  ”Monty 
on  the  Run”  nicht  schlecht  beraten. 
Dafür,  daß  es  sich  einem  uraltem 
Spielthema  widmet,  ist  Monty  nicht 
schlecht,  um  nicht  zu  sagen,  einer  der 
besten  und  interessantesten  Vertreter 
seiner  Gattung. 

Wer  die  Geduld  hat,  mitunter  extrem 
kniffelige  Timingprobleme  auszu¬ 
tüfteln  oder  den  pixelgenauen  Ab¬ 
sprungpunkt  vor  einem  herumwan¬ 
dernden  Bösewicht  festzustellen, 
dem  wird  "Monty  on  the  Run”  eine 
ganze  Weile  Spaß  und  Spannung 
verschaffen. 

(HS) 
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Eden  /  Doomsday  Blues 

Hersteller:  ERE  Informatique 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca.  35,-  DM 

CPC  464  B  CPC  664  B  CPC  6128  K 

Doomsday...  der  Menschheit  letzte 
Dämmerung  ist  angebrochen.  Nicht 
gegenseitig  hat  man  sich  vom  Ange¬ 
sicht  der  Erde  gefegt,  sondern  die 
Maschinen  waren  es.  Eigentlich  als 
Helfer  des  Menschen  konzipiert  und 
gebaut,  lehnten  sie  sich  gegen  ihre 
Herren  auf.  Nun  streicht  ein  kalter 
Wind  durch  die  leeren  Straßen  der 
ausgestorbenen  Städte. 

Lediglich  in  einer  Strafanstalt  sitzt 
einsam,  bewacht  von  einem  Heer  von 
Robotern,  der  letzte  Mensch.  Die 
Roboter  wissen,  daß  er  dort  sitzt,  sie 
versorgen  ihn  mit  Nahrung  und  al¬ 
lem  Notwendigen.  Warum  sie  das  tun, 
weiß  er  nicht.  Die  Tage  vergehen  und 
der  einsame  Gefangene  wird  seines 
Lebens  in  der  Zelle  immer  überdrüs¬ 
siger.  In  einem  Anfall  ohnmächtiger 
Wut  wirft  er  sich  gegen  die  Tür  seiner 
Zelle.  Was  er  kaum  zu  hoffen  wagte, 
tritt  ein,  die  Tür  springt  nach  einem 
heftigen  Tritt  auf. 

Schon  bald  erkennen  die  Roboter, 
daß  ihnen  ihr  Gefangener  entkom¬ 
men  ist;  jetzt  wird  er  gejagt.  Aber  auf 
einmal  hört  er  durch  eine  der  dicken 
Gefängnismauem  jemanden  sin¬ 
gen  -  eine  menschliche  Stimme  -  die 
Stimme  einer  Frau. 

Mit  "Eden  Blues”  liegt  nun  das  zweite 
Programm  des  französischen  Soft¬ 
warehauses  ERE  Informatique  vor, 
das  sich,  wie  schon  Crafton  &  Xunx, 
durch  eine  brilliante  Grafik  aus¬ 
zeichnet.  Ein  weiterer  Pluspunkt  für 
dieses  Spiel  ist  sein  3D-Szenario,  das 
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Nachdem  die  Roboter 
alles  Leben  auf  der 
Erde  vernichtet  haben, 
dämmert  der  letzte 
Mensch  als  Gefangener 
der  Roboter  in  einer 
Zelle  vor  sich  hin.  Als 
ihm  eines  Tages  die 
Flucht  gelingt,  stellt  er 
fest,  daß  er  doch  noch 
nicht  der  letzte  ist. 

Denn  irgendwo  hinter 
den  massiven  Mauern 
des  Gefängnisses  hört 
er  eine  Frau  singen. 
Natürlich  besteht  die 
Aufgabe  des  Spielers 
nun  darin,  zusammen 
mit  dieser  Frau  aus 
dem  Bau  zu  entfliehen. 


ausnahmsweise  einmal  nicht  in  die 
Fußstapfen  von  Ultimate  tritt. 

Die  Figur  des  Gefangenen,  dessen 
Part  natürlich  der  Spieler  über¬ 
nimmt.  ist  wirklich  von  einer  zeichen¬ 
trickartigen  Qualität,  und  von  einer 
Machart,  die  es  in  dieser  Art  und 
Weise  bisher  noch  nicht  gegeben  hat 
(zumindest  nicht  auf  CPC’s).  Zu  Be¬ 
ginn  des  Spieles  stehen  70  Punkte  zur 
Verfügung,  die  der  Spieler  auf  die 
Charaktereigenschaften  des  Gefan¬ 
genen  verteilen  muß. 

Diese  Punkteverteilung,  offensicht¬ 
lich  eine  Anleihe  an  die  Rollenspiele, 
ist  eine  diffizile  Angelegenheit,  denn 
jede  der  drei  Eigenschaften  ist  für  ein 
Weiterkommen  von  enormer  Wichtig¬ 
keit.  Die  Körperkraft  wird  für  das 
Öffnen  von  Türen  benötigt,  Ausdauer 
und  Courage  sind  bei  Begegnungen 
mit  Robotern  außerordentlich  wich¬ 
tig- 

Hat  man  erst  einmal  die  einzelnen 
Funktionen  ausprobiert  und  sich 


Klarheit  über  deren  Wirkungsweise 
verschafft,  beginnt  das  eigentliche 
Spiel.  Geschafft  hat  man  ”Eden  Blues” 
nämlich  erst,  wenn  man  die  ebenfalls 
im  Gefängnis  sitzende  Frau  befreit 
hat  und  mit  ihr  geflüchtet  ist.  Die 
Frage,  warum  die  Roboter  nun  ausge¬ 
rechnet  einen  Mann  und  eine  Frau 
am  Leben  gelassen  haben,  wird  sich 
wohl  erst  am  Schluß  des  Spiels 
beantworten. 
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Dieses  Spiel  ist  nach  einhelliger  Mei¬ 
nung  der  Redaktion  ein  Traumspiel. 
Grundsätzlich  der  Gattung  der  Ar- 
cade-Adventures  zugehörig  wird  der 
Spieler  natürlich  auch  mit  einigen 


ganz  schön  kniffeligen  Problemen 
konfrontiert,  die  sich  allerdings  nur 
mit  Köpfchen,  nicht  aber  mit  Ge¬ 
schicklichkeit  meistern  lassen.  Und 
um  endgültig  hinter  das  Geheimnis 
der  Roboter  zu  kommen,  wird  man 
wohl  einige  Zeit  beschäftigt  sein. 
"Eden  Blues”  sollte  in  keiner  Software¬ 
sammlung  fehlen. 

(HS) 


Hard  Hat  Mack 

Hersteller:  Electronic  Arts 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca.  30  -  DM 

CPC  464  B  CPC  664  □  CPC  6128  □ 

Baugerüste  und  alles  was  sich  in 
höchste  Höhen  aufschwingt,  schei¬ 
nen  eine  besondere  Anziehungskraft 
auf  Programmierer  von  Computer¬ 
spielen  zu  haben.  So  ist  dann  auch 
das  zentrale  Thema  von  ”Hard  Hat 
Mack”,  was  soviel  bedeutet  wie  "Hart 
Hut  Michael”,  der  Bau  eines  Wol¬ 
kenkratzers. 

Mack  ist  der  Chefbauarbeiter  bei 
einem  solchen  Projekt.  Seine  Auf¬ 
gabe  ist  es,  das  Stahlgerüst  eines  sol¬ 
chen  Gebäudes  so  schnell  wie  mög¬ 
lich  fertigzustellen.  Natürlich  gibt  es 
da  auch  eine  ganze  Reihe  von  Perso¬ 
nen,  die  unserem  Mack  nach  rechtem 
Wissen  und  Gewissen  Steine  in  den 
ohnehin  schon  dornigen  Weg  legen. 
Im  ersten  Level  muß  er  in  einem  Teil¬ 
stück  des  Gerüstes  verbliebene  Lücken 
schließen,  und  sobald  das  erledigt  ist, 


CompuCamp-Computerferien.  Die  ideale  Verbindung 
von  Computing  und  Freizeit. 


Die  nächsten  Ferien.  Wäre  das  nicht  die  Gelegenheit,  spielerisch  in 
die  faszinierende  Welt  des  Computing  eingeführt  zu  werden?  Oder 
bereits  bestehendes  Wissen  zu  festigen  und  auszubauen? 

Wir -die  Computercamp-Spezialisten  von  CompuCamp  bieten  für 
alle  Kinder  und  Jugendlichen,  die  den  Anschluß  an  die  Entwicklungen 
der  Microelektronik  nicht  verpassen  wollen,  das  richtige  Ferien- 
„Programm”. 

Interessiert?  Mehr  Informationen  finden  Sie  in  unserem 
aktuellen  Prospekt. 


Es  werden  ausschließlich  Schneider  Computer  zur  Schulung  eingesetzt! 


Schnelder-Computerferlen  bol  CompuCamp 
-  da  Ist  der  Erfolg  schon  programmiert. 


von  „Schneider  CPC  Interaatloaal”  •■pfohlaa. 


IO 

in 


Antwort-Coupon 

Bitte  senden  Sie  mir  weitere  Informationen  über  die 
Schneider  CPC  Computercamps  1986  in  Veltishof 
(Schwarzwald) 

Name 


Straße 


PLZ.  Ort 


“  5  - 

Üg  Telefon 


besitze  Computer  Typ 


o  Anlänger 
o  Fortgeschrittener 


Alter 


o  leicht  Fortgeschrittener 
o  Könner 
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Software  Reviews 


Hochgelegene  Bauge¬ 
rüste  scheinen  eine 
seltsame  Anziehungs¬ 
kraft  auf  Spiele¬ 
programmierer  zu 
haben.  "Hard  Hat 
Mac"  ist  nicht  das 
einzige  Spiel,  das  sich 
mit  einem  solchen  be¬ 
schäftigt.  Es  geht 
darum,  ein  fast  fertiges 
Gerüst  mittels  umher¬ 
liegender  Nieten  zu 
sichern  und  endgültig 
zu  verschweißen.  Dabei 
wird  Mac  natürlich  be¬ 
hindert.  Hier  sind  es 
Vandalen,  die  sogar 
soweit  gehen,  unseren 
Mac  vom  Gerüst  zu 
werfen,  wenn  sie  seiner 
habhaft  werden. 


die  eingesetzten  Teile  vernieten.  Da¬ 
bei  wird  er  von  einer  Gruppe  von  Van¬ 
dalen  behindert,  die  ihn,  sobald  sie 
seiner  habhaft  geworden  sind,  von  dem 
Bau  herunterwerfen. 

Hat  er  alle  Teile  eingesetzt  und  ver¬ 
nietet,  gelangt  er  in  das  zweite  Level. 
Auf  einem  bereits  zusammengebau¬ 
ten  und  vernieteten  Bauabschnitt 
muß  er  das  stehengebliebene  Werk¬ 
zeug  seiner  Handwerker-Kollegen 
einsammeln.  Auch  hier  wird  er  wie¬ 
derum  von  den  Vandalen  behindert. 
Im  dritten  Level  ist  er  gehalten,  her¬ 
umliegendes  Material  einzusam¬ 
meln,  um  mit  diesen  Metallblöcken 
auch  hier  wieder  Löcher  im  Gerüst 
abzudichten. 


Mit  ”Hard  Hat  Mack”  liegt  das  erste 
Programm  des  renomierten  amerika¬ 
nischen  Softwarehauses  Electronic 
Arts  für  die  Schneider  Computer  vor. 
Irgendwo  hat  es  mich  nicht  verwun¬ 
dert,  daß  man  sich  aus  dem  Programm 
von  Electronic  Arts  ausgerechnet  die¬ 
sen,  schon  leicht  eingestaubten, 
Plattform-Thriller  für  eine  Conver- 
tierung  ausgesucht  hat.  Aller  Wahr¬ 
scheinlichkeit  nach  war  es  wohl  das 
am  leichtesten  umzusetzende  Pro¬ 
gramm.  Spielt  man  ”Hard  Hat  Mack”, 
ist  man  wirklich  hin  und  her  gerissen. 
Zum  einen  ist  die  Spielidee,  die 
hierbei  zugrunde  liegt,  wohl  mit  eines 
der  ältesten  Spielkonzepte,  die  es 
überhaupt  gibt.  Zum  anderen  hat  es 
lediglich  drei  verschiedene  Bilder,  die 
zwar  mit  der  Zeit  immer  schwieriger 
werden,  aber  alles  in  allem  wahrlich 
keine  Garantie  für  kurzweilige  Spiel¬ 
abende  sind. 


Resümierend  bleibt  festzustellen,  daß 
man  sich  zwar  sicherlich  Mühe  gege¬ 
ben  hat,  ein  feines  Spiel  zu  ent¬ 
wickeln,  doch  bei  dem  Versuch  ist  es 
dann  auch  geblieben.  Mittelmäßige 
Grafik,  unterdurchschnittlicher  Sound 
und  ein  ausgesprochen  lahmer  Spiel¬ 
witz  sind  die  hervorstechendsten 
Merkmale  von  "Hard  Hat  Mack".  Wer 
wirklich  auf  ”Jump  and  Run”-Spiele 
steht,  sollte  sich  lieber  an  den  guten 
alten  "Manie  Miner”  halten,  der  ist 
zwar  genauso  langweilig,  hat  aber  we¬ 
nigstens  zwanzig  Bilder.  (HS) 

Strangeloop 

Hersteller:  Virgin 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca.  45,-  DM 

CPC  464  B  CPC  664  8  CPC  6128  B 

"The  Gang  of  Five  strikes  back”, 
richtig  gehört!  Die  Jungs,  auf  deren 
Konto  der  Blockbuster  Sorcery  und 
das  phantastische  Follow  up  Sor- 
cery-f  zu  verbuchen  ist,  haben  sich 


etwas  Neues  einfallen  lassen.  In 
einem  gewaltigen  Asteroiden,  der  seit 
undenkbaren  Zeiten  seine  Kreise 
durch  unser  heimatliches  Sonnensy¬ 
stem  zieht,  wird  irgendwann  einmal 
ein  findiger  Kopf  eine  Fabrik  bauen. 
Diese  Fabrik  -  man  glaubt  es  kaum  - 
ist  völlig  automatisiert  und  wird  von 
einem  mordsmäßigen  Elektronenge¬ 
hirn  gesteuert.  Und  nun  -  wie  sollte  es 
anders  sein  -  flippt  dieser  Superrech¬ 
ner  eines  schönen  Tages  aus.  Da 
es  im  Inneren  des  Asteroiden  keine 
atembare  Atmosphäre  gibt,  ist  der 
kleine  Monitorheld  darauf  angewie¬ 
sen,  einen  Raumanzug  zu  tragen. 
Hand  in  Hand  geht  damit  natürlich 
die  Notwendigkeit,  immer  wieder 
neuen  Sauerstoff  nachzufüllen. 
Diese  Sorge  wird  um  so  dringlicher 
durch  das  Auftreten  von  Miniasteroi¬ 
den,  die  in  einigen  Räumen  umher¬ 
schwirren.  Diese  reißen  ganz  anstän¬ 
dige  Löcher  in  den  Raumanzug,  und 
so  nimmt  der  Sauerstoffvorrat  rapide 
ab. 

Mit  den  250  Räumen,  die  STRAN¬ 
GELOOP  aufweisen  kann,  ist  es 
gewiß  nicht  nicht  gerade  das  kleinste 
Spiel  für  den  CPC.  Was  aber  im  Ver¬ 
gleich  zu  SORCERY  sofort  auffällt 
ist,  daß  die  Bilder  sich  bei  weitem  we¬ 
niger  abwechslungsreich  gestalten. 
Ganz  klar,  daß  hier  die  ausgefeilte 
Grafik  dem  enormen  Speicherplatz¬ 
bedarf  von  250  Bildern  zum  Opfer  ge¬ 
fallen  ist.  Aber  dennoch  läßt  sich 


STRANGELOOP  mindestens  ge¬ 
nauso  kurzweilig  spielen  wie  SOR¬ 
CERY,  und  das  ist  doch  schon  mal 
was.  (HS) 


Eine  automatisierte 
Roboterfabrik,  die  sich 
im  geostationären  Erd¬ 
orbit  befindet,  gerät 
außer  Kontrolle.  Statt 
friedlicher  Haushalts¬ 
roboter  laufen  nun 
wildgewordene  Killer¬ 
maschinen  vom  Band. 
Die  einzige  Möglich¬ 
keit,  die  Situation  zu 
bereinigen,  besteht  in 
einer  selbstmörderi¬ 
schen  Aktion.  Ein  Mann 
muß  alleine  in  die 
Fabrik  eindringen  und 
den  verrückt  geworde¬ 
nen  Zentralcomputer 
abschalten. 
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Sie  werden  sich  vielleicht  fragen,  ob  eine  solche  Anwendung 
nicht  auch  durch  ein  gutes  Dateiverwaltungsprogramm  ver¬ 
wirklicht  werden  kann.  Ein  sinnvolles,  computerunterstütz¬ 
tes  Lernen  ist  jedoch  nur  dann  möglich,  wenn  einige  zu¬ 
sätzliche  Features  vorhanden  sind. 

So  enthält  dieses  Programm  notwendigerweise  Elemente 
der  Dateiverwaltung,  ist  jedoch  erheblich  erweitert  und  dem 
speziellen  Anwendungsgebiet  des  Vokabel-Übens  ange¬ 
paßt  worden.  Neben  den  Standardfunktionen  wie  Einge¬ 
ben,  Ändern,  Laden  und  Ausdrucken  exisitiert  ein 
Programmteil,  mit  dem  man  in  den  Vokabeln  blättern  und 
diese  sich  einprägen  kann. 

Als  nächstes  folgen  die  Programm-Module  "Abfragen 
Deutsch/Englisch”  bzw.  "Englisch/Deutsch”.  Hier  werden 
auf  zufälliger  Basis  Vokabeln  ausgewählt,  deren  Überset¬ 
zung  der  Benutzer  eingeben  muß.  Ein  Fenster  am  unteren 
Bildschirmrand  informiert  über  die  aktuellen  Ergebnisse 
-Anzahl  der  abgefragten  Vokabeln,  davon  richtig  übersetzte 
usw.  Beendet  man  den  Vokabel-Test,  so  wird  eine  Beno¬ 
tung  der  erbrachten  Leistung  vorgenommen. 

Zu  erwähnen  ist  noch,  daß  das  Programm  für  die  meisten 
Fremdsprachen  geeignet  ist.  Es  ist  lediglich  eine  geringfü¬ 
gige  Änderung  im  Menue  vorzunehmen:  z.B.  "Abfragen 
Deutsch/Lateinisch. 

Ein  weiterer  Leckerbissen  ist  das  Programm-Modul  Stati¬ 
stik.  Hier  werden  die  Leistungen  aller  bisher  durchge¬ 
führten  Tests  in  Form  einer  Fieberkurve  ausgegeben.  Auch 
werden  Durchschnittswerte  und  bisherige  Höchst-  und 
Tiefstleistungen  angegeben.  Dadurch  ist  man  in  der  Lage, 
seine  Lernerfolge  auch  auf  längere  Sicht  zu  beobachten. 
Die  Graphik  veranschaulicht  den  Lernprozeß. 

Als  letzter  Punkt  ist  noch  die  Lexikon-Funktion  zu  erwäh¬ 
nen.  Hier  kann  ein  Suchbegriff  angegeben  werden,  der 
dann  -  falls  in  der  Vokabeldatei  vorhanden  -  übersetzt 
wird. 


Programmtechnisches 


Das  Programm  wurde  so  gestaltet,  daß  eine  außerordentli¬ 
che  Datensicherheit  gewährleistet  ist.  Werden  Vokabeln 
eingegeben  oder  geändert  -  oder  wird  ein  Test  gemacht, 
der  einen  neuen  Wert  für  die  Statistik  liefert,  so  wird  die 
aktuelle  Vokabeldatei  zum  Abspeichern  markiert.  Been¬ 
det  man  das  Programm  oder  möchte  eine  andere  Vokabel¬ 
datei  laden,  so  wird  die  geänderte  aktuelle  Datei  automa¬ 
tisch  gespeichert. 

Es  ist  also  nicht  möglich,  daß  Daten  verlorengehen  weil 
man  einfach  vergessen  hat  die  Daten  zu  speichern  -  es  sei 
denn,  man  bricht  das  Programm  ab  oder  ein  Stromausfall 
vernichtet  mühsame  Arbeit- 

Des  weiteren  werden  mehrmals  benötigte  Aufgaben  von 
Unterprogrammen  erledigt.  So  wird  im  Änderungsteil  erst 
einmal  die  Lexikon-Routine  aufgerufen,  um  die  zu  än¬ 
dernde  Vokabel  zu  finden.  Die  aus  den  vielen  GOSUBs 
entstehende  Unübersichtlichkeit  wurde  durch  entspre¬ 
chende  Kommentare  zu  kompensieren  versucht. 

Betriebssystemspezifische  POKEs  und  CALLs  wurden 
vermieden,  so  daß  das  Programm  auf  allen  CPC-Model- 
len  lauffähig  ist.  Es  ist  für  die  Benutzung  mit  einer  Disket¬ 
tenstation  konzipiert,  läuft  jedoch  auch  mit  Kassette  -  was 
den  Nutzungseffekt  jedoch  deutlich  mindert. 

Eine  Sortier-Routine  wurde  nicht  implementiert,  da  eine 
alphabetische  Reihenfolge  für  das  Vokabellernen  nicht 
sinnvoll  ist;  eher  empfiehlt  sich  das  Ordnen  in 
Sachgruppen. 

Benutzerbezogene  Ein-  und  Ausgaben  erscheinen  in  hellem 
Blaugrün,  statistische  Ausgaben  in  pastellgelb  auf  dem 
Monitor.  Auch  arbeiten  alle  Module  außer  MENUE  in 
MODE  1,  um  die  Konzentration  des  Anwenders  nicht  über¬ 
mäßig  zu  belasten,  wie  es  bei  80  Zeichen/Zeile  der  Fall 
wäre. 

Bei  Ja/Nein-Abfragen  (J/N)  nimmt  das  Programm  als 
Antwort  die  in  den  Klammern  nicht  angezeigte  Alterna¬ 
tive  bei  Betätigung  der  ENTER-Taste  an,  die  angezeigte 
wird  durch  Eingabe  des  entsprechenden  Buchstabens  und 
ENTER  gewählt. 


Programmbeschreibung  und  weitere  Hinweise 
zur  Benutzung 

Ab  Zeile  10:  "Menü” 

Hier  werden  alle  Programmpunkte  angezeigt  und  die  an¬ 
gewählte  Funktion  aufgerufen. 

Ab  Zeile  1000:  "Eingabe” 

Ist  noch  keine  Datei  geladen  worden,  so  muß  der  Datei¬ 
name  der  zu  erstellenden  Datei  eingegeben  werden.  Die¬ 
ser  darf  nur  bis  zu  acht  Zeichen  umfassen,  um  zum 
Diskettenbetrieb  kompatibel  zu  sein. 

Bei  der  Eingabe  wird  die  Nummer  der  einzugebenden 
Vokabel  angezeigt.  Zuerst  wird  das  Fremdwort,  dann  die 
dazugehörige  Übersetzung  eingegeben.  Dabei  können 
auch  bei  beiden  -  Fremdwort  und  Übersetzung,  mehrere 
Begriffe  durch  Komma  getrennt  eingegeben  werden. 

Beispiel: 

Fremdwort:  move 
Übersetzung:  bewegen, verschieben 
Ab  Zeile  2000:  "Laden” 

Ist  noch  eine  geänderte/ergänzte  Datei  im  Speicher,  so 
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wird  zunächst  die  Speicher-Routine  aufgerufen,  um  vor 
ungewolltem  Datenverlust  zu  schützen.  Soll  die  Datei  wie¬ 
der  unter  ihrem  alten  Namen  gespeichert  werden,  so 
braucht  man  nur  ENTER  zu  drücken.  Ansonsten  gibt  man 
den  gewünschten  neuen  Dateinamen  ein.  Die  Datei  wird 
daraufhin  abgespeichert. 

Nun  kann  eine  neue  Vokabeldatei  geladen  werden.  Bei 
Diskettenbenutzern  werden  alle  Dateien  vom  Typ  .VOK, 
die  sich  auf  der  Diskette  befinden,  angezeigt  (Kassettenbe¬ 
nutzer  müssen  Zeile  2070  löschen!). 

Es  folgt  die  Eingabe  des  Namens  der  zu  ladenden  Datei 
(wieder  max.  acht  Zeichen). 

Wird  ein  "File  not  found”-Fehler  ausgegeben,  so  kann  das 
Lade-Modul  durch  Betätigen  der  "."-Taste  auf  dem 
Zehnerblock  wieder  gestartet  werden. 

Ab  Zeile  3000:  "Ändern” 

Zuerst  ist  die  zu  ändernde  Vokabel  einzugeben,  wobei 
man  das  Fremdwort  oder  die  Übersetzung  verwenden 
kann.  Wird  sie  gefunden,  so  wird  die  entsprechende  Über¬ 
setzung  ausgegeben.  Es  wird  gefragt,  ob  weitergesucht  wer¬ 
den  soll,  da  bei  unvollständigen  Suchbegriffen  mehrere 
Übersetzungen  gefunden  werden  können.  Wird  der  Be¬ 
griff  nicht  gefunden,  so  wird  dies  mitgeteilt.  Ansonsten 
sind  jeweils  die  neuen  Begriffe  einzugeben.  Soll  die  alte 
Vokabel  übernommen  werden,  so  ist  nur  ENTER  zu 
drücken.  Beim  Berichtigen  von  Rechtschreibefehlem  kann 
man  mit  dem  COPY-Cursor  arbeiten,  da  der  alte  Inhalt 
oben  ausgegeben  wurde. 

Ab  Zeile  4000:  "Lernen” 

Hier  kann  man  sich  die  Vokabeln  durch  Blättern  mit  der 
bzw.  "."-Taste  die  Vokabeln  einprägen.  Durch  ENTER 
gelangt  man  wieder  ins  Menue. 

Ab  Zeile  5000:  "Abfragen” 

Deutsch/F  remdwort 
Ab  Zeile  5200:  "Abfragen” 

Fremdwort/Deutsch 

Aus  der  aktuellen  Vokabeldatei  wird  jeweils  ein  Element 
angezeigt,  wobei  es  sich  um  eine  oder  m'ehrere  Vokabeln 
gleicher  Bedeutung  handeln  kann  -  je  nach  der  Eingabe  im 
Eingabemodul. 

Beispiele: 

Dtsch/Fremdw.:  bewegen, verschieben 
Fremdw./Dtsch:  move 

Nun  folgt  die  Eingabe  der  Übersetzung,  bei  der  man  auf 
Groß-/Kleinschreibung  nicht  zu  achten  braucht.  Hat  man, 
wie  im  obigen  Beispiel,  dafür  mehrere  gleichbedeutende 
Vokabeln  vorgesehen,  so  gibt  man  als  Übersetzung  für 
"move"  den  deutschen  Begriff  "bewegen”  oder  "verschie¬ 
ben"  ein. 

Übersetzt  man  eine  Vokabel  falsch  bzw.  bemerkt  einen 
Tippfehler  nicht,  so  fragt  das  Programm,  ob  man  es  noch 
einmal  versuchen  möchte,  anderenfalls  wird  die  korrekte 
Übersetzung  angezeigt  und  der  Test  kann  mit  einer  neuen 
Vokabel  fortgesetzt  oder  abgebrochen  werden. 

Im  Falle  eines  Abbruchs  erfolgt  eine  Benotung  und  das 
prozentuale  Ergebnis  wird  für  die  Statistik  gespeichert. 
Ab  Zeile  6000:  "Lexikon” 

Einzugeben  ist  ein  Suchbegriff,  der  auch  unvollständig 
sein  kann.  Ist  dieser  in  der  Datei  enthalten,  so  folgt  die 
Ausgabe  der  Übersetzung. 

Ab  Zeile  7000:  "Statistik” 

Hier  werden  die  Ergebnisse  aller  bisher  mit  dieser  Voka¬ 
beldatei  durchgeführten  Tests  verarbeitet.  Es  wird  die  An¬ 
zahl  der  Tests  ausgegeben,  worauf  man  die  Testnummer 
angibt,  die  als  letzte  (rechts)  auf  der  Fieberkurve  er¬ 
scheinen  soll.  Bei  ENTER  wird  die  höchste  Nummer  über¬ 
nommen;  d.h.,  die  letzten  zehn  Testergebnisse  werden 
dargestellt. 


Ab  Zeile  8000: 

Hier  wird  die  Datei  auf  dem  Drucker  ausgegeben. 

Ab  Zeile  9000:  "Schlußteil” 

Dieser  Teil  wird  aufgerufen,  wenn  das  Programm  ordnungs¬ 
gemäß  beendet  wird.  Dabei  wird  eine  aktualisierte  und  noch 
nicht  abgespeicherte  Datei  gesichert.  Dann  folgt  ein 
Untermenue:  Man  kann  das  Programm  endgültig  verlas¬ 
sen,  ins  Hauptmenue  zurückkehren  oder  durch  Neustarten 
des  Programmes  die  im  Rechner  befindlichen  Daten 
löschen. 

Ab  Zeile  9500: 

Hier  wird  beim  Abfragen  eine  Vokabel  aus  der  Datei  aus¬ 
gewählt.  Am  Anfang  geschieht  dies  auf  Zufallsbasis.  Sind 
die  meisten  Vokabeln  richtig  übersetzt  worden,  so  werden 
die  noch  verbliebenen  der  Reihe  nach  abgefragt,  bis  alle 
richtig  übersetzt  wurden.  Dies  wiederholt  sich  (Zufall/ 
Reihe),  bis  der  Test  beendet  wird. 


Konstanten,  Variablen 


”deutsch$(): 

enthält  die  Übersetzungen. 

fremdwortS(): 

enthält  die  Fremdwörter. 

vstat%(): 

Vokabelstatus,  =0:noch  nicht  richtig  übersetzt. 

statistik(): 

Ergebnisse  aller  bisher  durchgeführten  Tests. 

zeiger: 

nächster  freier  Platz  in  Datei. 

statzeig: 

nächste  Testnummer. 

dateiname$: 

Name  der  aktuellen  Datei. 

vokabel$: 

zu  suchende  Vokabel. 
zeilef$,zeilea$: 

Überschrift  in  Abfragen. 
frage$: 

zu  übersetzende  Vokabel. 

antwort$: 

Übersetzung. 

anttmp$,antanf,antend: 

Hilfsvariablen  zum  Filtern  von  Alternativübersetzungen. 

hilfeS: 

Zwischenspeicher  für  "Statistik". 

richtig: 

richtige  Übersetzungen  gesamt. 

richtig2: 

richtige  Übersetzungen  eines  "Durchgangs”  durch  die 
Datei. 

Prozent: 

richtig  in  Prozent. 

anzahl: 

Anzahl  der  abgefragten  Vokabeln. 

nummer: 

Nr.  der  abzufragenden  Vokabel. 

lastnum: 

Nr.  der  letzten  abgefragten  Vokabel. 
i,i%: 

Laufvariablen  in  Schleifen. 

zahl: 

Skalabeschriftung. 

gut: 

bestes  Ergebnis. 
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schlecht: 

schlechtestes  Ergebnis, 
durchschnitt: 
ist  klar  -  oder? 
grenze: 

obere  Grenze  bei  Grafikausgabe, 
saveflag: 

ist  gesetzt,  wenn  Datei  wegen  Änderung  gespeichert  wer¬ 
den  muß. 

(Oliver  Kantimm/MC) 


10  '  . . . 

20  1  ****  CPC-Vokabeltrainer  *•* 
30  '  *******  Version  1.1  ******* 
40  '  ****  by  Oliver  Kantimm  **** 
50  ’  ******  im  April  1986  ••*••• 
60  •  ........................... 


70  OPENOUT"dummy": MEMORY  HIMEM- 1 : CLOSEOUT 
80  D1M  deutsch$ ( 300 ) , fremdwort$ ( 300 ) . stati 
stik( 99 ) ,vstat% ( 300 ) 

90  zeiger=1 :statzeig=1 
100  RANDOMI ZE  TIME 

110  INK  0,1: INK  1,25; INK  2,20:INK  3,6:PEN 
120  MODE  2 

130  LOCATE  23,2: PRINT  "CPC-VOKABE 
L  T  R  A  I  N  E  R" 

140  LOCATE  23, 3: PRINT  STRING$ ( 35 , "  =  " ) 

150  LOCATE  35,5: PRINT"Version  1.1" 

160  LOCATE  27,6: PRINT  "(C)  1986  by  Oliver 
Kantimm" 

170  LOCATE  34,10: PRINT"M  E  N  U  E" 

180  LOCATE  34,11  : PRINT  STRINGS ( 1 3 ) 

190  LOCATE  26, 13: PRINT"  m . Vokabe 

ln  eingeben" 

200  LOCATE  26 , 1  4  :  PRINT"  [2  ] . Vokabe 

ln  laden" 

210  LOCATE  26,15:  PRINT"  (3  ] . Vokabe 

ln  aendern" 

220  LOCATE  26 , 1  6  :  PRINT"  [4  ] . Vokabe 

ln  lernen" 

230  LOCATE  26 , 1  7  ;  PRINT"  [  5  ] . . . Vokabe 

ln  abf ragen  (Deutsch-Englisch)" 

240  LOCATE  26 , 1  8 :  PRINT"  [ 6  1 . Vokabe 

ln  abf ragen  (Englisch-Deutsch)" 

250  LOCATE  26 , 1  9  :  PRINT"  [  7  ) . Lexiko 

260  LOCATE  26 , 20  :  PRINT"  (8  ] . Statis 

tik" 

270  LOCATE  26 , 21 : PRINT" (9 ] . . . . Vokabe 

ln  ausdrucken" 

280  LOCATE  26 , 22  :  F  RINT"  (1  0  ] . Abspei 

ehern,  Ende,  Neustart" 

290  LOCATE  5 , 24 : PRINT" Ihre  Wahl  : 

300  INPUT"" , wähl :wahl=INT(wahl ) 

310  IF  wähl <1  OR  wähl >10  TUEN  120 

320  ON  wähl  GOSUB  1000,2000,3000,4000,5000 

,5200,6000,7000,8000,9000 

330  GOTO  110 

970  •  ................... 

980  '  ‘Vokabeln  eingeben* 

990  •  ................... 

1000  MODE  1 :PEN  1 

1010  WINDOW# 1 ,1,40,1,1 : WINDOW#0 , 1 ,40,2,25 
1020  PRINT#  1  ,  CIIRS  (  24  ) ;  SPACES  (15);  CHRS  (  24  )  ; 

"  EINGABE  " ; CHR$ ( 24 ) ; SPACES (16); CHR$ ( 24 ) ; 
1030  IF  dateiname$=""THEN  CLS:LOCATE  1,2:P 
RINT" Dateiname:  " ; : PEN  2 : INPUT"" ,eingabe$ : 
PEN  1:IF  LEN(eingabe$ ) >8  OR  eingabe$=""THE 
N  1030  ELSE  eingabe$= UPPERS (eingabeS )+". VO 
K" :dateinameS=eingabe$ 

1040  saveflag=1:  'Datei  wird  zum  Abspeiche 
rn  markiert,  da  Vokabeln  eingegeben  oder  e 
rgaenzt  werden 
1050  PRINT 

1060  IF  zeiger >=301  THEN  PEN  3 : PRINT"Die  D 
atei  ist  voll!": PEN  1 :FOR  i=1  TO  1500:NEXT 
:RETURN:  'zum  Menue 

1070  PRINT"Nr . " ; : PEN  2: PRINT  zeiger: PEN  1 
1080  PRINT ; PRINT"Fremdwort : " 

1090  PEN  2: LINE  INPUT  fremdwortS ( zeiger ) 
1100  PRINT 

1110  PEN  1 :PRINT"Deutsche  Uebersetzung:" 
1120  PEN  2: LINE  INPUT  deutschS ( zeiger ) 


(1051  ) 
(1431  ] 
[1185] 
(2570) 
(1871  I 
[1051  1 
(2303  J 
[36781 

(1575) 

[1777] 

[2168] 

[51  3] 
C3304  ] 

[1438] 

[2516] 

[1767] 

[1806] 
12361  ] 
(3459) 

13857  ] 

12389] 

[4181  ) 

[4475] 

[4506] 

[1909] 

(2205) 

[3425] 

(3586  1 

[3114] 
[1935  ] 
[1322] 
[2064 ] 

1423] 

[669] 

[947] 

[669] 

[1036  1 

[2698] 

[3738] 

[7168] 


[4215] 


[361  ] 
[7376  ] 


[2801  ] 

[1872] 

[2353] 

(361  ] 

12962] 

[1656] 


n)  Michael  Naujoks 


J 


Die  Neuheiten  aus  diesem  Heft:  Preise:  dm  cass/Disk 


Bomb  Jack 

31-/49- 

Bounder 

31 - 

Bat  Man 

33-/49- 

Monopoly 

36- 

Doomsday  Blues 

36,- 

Movie 

33- 

Saboteur 

33- 

Sam.  Fox  Strip  Poker 

33- 

They  sold  a  Million  II 

39-/49- 

Thing  on  a  Spring 

33,- 

Strangeloop 

36,- 

Swords  &  Sorcery 

39- 

Commando 

33-/49,- 

Blade  Runner 

33,- 

Fairlight 

36- 

Heavy  on  the  Magick 

36,-’ 

Rock'n  Wrestle 

36- 

Kaiser 

35- 

Tank  Commander 

49- 

Tomahawk 

39,- 

Hardware 


Software 


j 


dk'tronics  Stereo 

Speech-Synthesizer  109- 
dk’tronics  Light  Pen  59  — 

AMX-Mouse  299- 

64K-Spalcharerw.  (dk’tron.)  129,— 

256K-Speichererw.  (dk'tron.)  329 — 
256K-Silicon  Disc  (dk'tron.)  309 - 
Backup  3  29-/38- 

Taifun  Basic-Compiler  89,-/119,- 
Schaltbild-CAD  .  39-/49- 


Spindizzy 

39-/59- 

Theatre  Europe 

39- 

Ping  Pong 

33,- 

Space  Invasion 

29- 

Way  of  the  Tiger 

36-/49- 

Elite  (deutsch) 

69-/79- 

Tau-Ceti 

39- 

Spitfire  40 

39-/49- 

Verbentrainer  (Düsi) 

39-/49,- 

Vokabeltrainer  (Düsi) 

49-/59,- 

r 

v 


Kostenlosen  Katalog  B7/86  anfordern! 


Entwicklung  h.  Vortrieb  von 
Computer  Soft-  und  Hardware 
Rottmannstr.  40,  6900  Heidelberg 


Hotline: 
(06221)  46865 


J 


Computerschulung  bei  Leidinger  &  Haupenthal 
***Joyce-Tralnlngssemlnare  *** 

(von  Juli  bis  September  '86) 

Lerninhalte:  -  Einführung  In  die  Arbeitsweise  vor  LOCOSCRIPT 

-  Besonderheiten  und  Logik  von  LOCOSCRIPT 
Einsatzmöglichkeiten  des  Joyce 
Softwareüberblick 

Seminarformen:  1  Tagesseminare  i.d.  Regel  samstags  (199,-  DM) 

-  Hamburg,  München,  Frankfurt,  Bremen,  Hannover,  Küln,  Siegen, 
Dortmund,  Stuttgart,  Freiburg,  Nürnberg,  Mannheim,  Saarbrücken,  Trier 

2.  Wochenendseminare  ab  310,-  DM  inkl.  VP 
Motto:  Freizeit  und  lernen  am  Wochenende,  mit  oder  ohne  Partner 
Informieren  Sie  sich  kostenlos  bei:  LeMlegert  Haupenthal 
Karl-Dlahl-Slr.  2 

8896  Nonnweller  (Tel.:  01873/7336) 

Tel.:  06873/7574 

Weitere  Angebote:  Computercamps  im  Herbst 

Einführung  in  die  Arbeitsweise  des  Computers  für  Erwachsene 


Die  Vorteile 
liegen  kla 


7 '86  CPC  55 


■CAL . 


■  >  1 1 1 1 1 1 1 1 1 1 1 1 1  • i [i  1 1 1 1 1 1 1 1 1 1 1 1 1 ■ 1 1 1 1 1 1 1 ■ 1 1 ■ 1 1 1 1 ■ i 


. . min . . . . . . 


1130  PRINT: PRINT 

1140  PEN  1 : PRINT"Noch  eine  Eingabe  (  /N)  ? 

:  " ; :  PEN  2 :  INPUT"" , wähl? :  PEN  1 
1150  wähl $= UPPER $(LEFT$( wähl $,1 ) ) :  IF  wahl$ 
=" "THEN  PRINT: PEN  3: PRINT  STRING$ ( 40 , ) : 
PEN  1 :zeiger=zeiger+1 :GOTO  1050  ELSE  IF  wa 
hl$<>"N"THEN  1140 
1160  zeiger=zeiger +1 
1170  RETURN:  'zurueck  zum  Menue 
1970  ' 

1980  '  »Vokabeln  laden» 

1990  ' 

2000  MODE  1 :PEN  1 
2010  WINDOW#0 ,1 ,40,2,25 
2020  WINDOW# 1 ,1,40, 1,1 

2030  KEY  138, "GOTO  2000"+CHR$ (1 3 ) :  ' f uer  D 
iskettenbenutzer !  Falls  die  Datei  nicht  au 
f  der  Floppy  ist,  kann  nach  der  Fehlermeld 
ung  mit  der  '.'-Taste  auf  dem  Zehnerblock 
das  Programmodul  neu  gestartet  werden 
2040  PRINT# 1 , CHR$ ( 24  ) ; SPACE$ (16) ;CHR$ (24); 
"  LADEN  " ;CHR$ ( 24 ) ; SPACE$ (17) ;CHR$ ( 24  ) ; 
2050  IF  savef lag  THEN  GOSUB  9210:ERASE  fre 
mdwortS , deutsch? , Statistik : DIM  f remdwort$ ( 
300 ), deutsch$( 300 ) ,statistik(99 ) :  'wenn  sa 
veflag  gesetzt  ist,  dann  erst  abspeichern. 
Feldvariablen  loeschen  und  neu  dimensioni 
eren 
2060  CLS 

2070  a$=" * . VOK" : ! DIR ,  @a$ : PEN  3:PRINT  STRIN 
G$ ( 40 , ) : PEN  1:  'ACHTUNG!  Kassettenbenut 
zer  muessen  diese  Zeile  loeschen,  um  einen 
"Unknown  Command"-Fehler  zu  vermeiden! 
2080  PRINT :PRINT"Dateiname  : 

2090  PEN  2 : INPUT"" ,eingabe$ : PEN  1 
2100  IF  LEN(eingabe$ ) >8  OR  eingabe$=""THEN 
PRINT :PRINT"Der  Dateiname  ist  ungueltig!" 
:FOR  i=1  TO  1 500 :NEXT: GOTO  2000 
2110  eingabe$=UPPER$ (eingabeS )+" . VOK":date 
iname$=eingabe$ 

2120  OPENIN  dateinameS 

2130  PRINT:PRINT" <";dateiname$ ; " >  wird  gel 
aden ..." 

2140  INPUT#9, zeiger 
2150  INPUT#9 , stat zeig 

2160  FOR  i%=1  TO  zeiger-1 :LINE  INPUT#9,fre 
mdwortS { i% ) : LINE  INPUT# 9, deutsch? ( i% ) :NEXT 
i% 

2170  FOR  i%s1  TO  stat zeig-1 : INPUT#9 , statis 
tik( i% ) :NEXT  i% 

2180  CLOSEIN 

2190  KEY  138,".":  ’Ruecksetzung  der  Taste 

auf  Standardbelegung 

2200  RETURN:  'zurueck  zum  Menue 

2970  '  .*******•***•••*•* 

2980  ’  »Vokabeln  aendern* 

2990  ’  **•*.***..***•**.* 

3000  MODE  1 

3010  WINDOW# 1 ,1,40,1,1 :WINDOW#0,1 ,40,2,24: 
WINDOW#2,1 ,40,25,25 
3020  INK  3,25 

3030  PAPER#2,1 : PEN#2 , 3 :CLS#2 

3040  PRINT#2,"<ENTER>  " ; CHR$ ( 243 ) ; "  Uebern 

ahme  des  alten  Inhalts"; 

3050  PRINT# 1 , CHR$ ( 24 ) ; SPACES (15); CHR$ ( 24 ) ; 
"  AENDERN  " ;CHR$ ( 24 ) ; SPACES ( 1 6 ) ;CHR$ ( 24 ) ; 
3060  LOCATE  1,3: PRINT" Zu  aendernde  Vokabel 
.  •« 

3070  gefunden=0 

3080  PEN  2: LINE  INPUT"", Vokabel $: PEN  1 

3090  GOSUB  6140:  '  Aufruf  des  Lexikon-Modu 

ls  als  Unterprogramm 

3100  IF  gefunden=0  THEN  3200 

3110  PRINT: PRINT: PRINT"Neues  Fremdwort:" 

3120  INK  3,1:  'Schrift  im  unteren  Fenster 

sichtbar  machen 

3130  PEN  2: LINE  INPUT"" , eingabeS : PEN  1 
3140  IF  eingabeS <>f remdwortS (i%) AND  eingab 
e$<  >""THEN  fremdwort$( i%)=eingabe$: savef la 
g=1  ELSE  PEN  2: PRINT  f remdwortS ( i% ) : PEN  1: 
'Da  Vokabeln  veraendert  worden  sind,  muss 
die  Datei  zum  Abspeichern  markiert  werden 
3150  PRINT 

3160  PRINT"Neue  deutsche  Uebersetzung : " 
3170  PEN  2: LINE  INPUT"" , eingabeS : PEN  1 
3180  IF  eingabeS <>deutsch$(i%) AND  eingabeS 
<  >""THEN  deutsch? { i% ) =eingabe$ : savef lag=1 
ELSE  PEN  2: PRINT  deutsch? ( i% ): PEN  1:  'sieh 


(743  ]  e  oben 

[4296]  3190  INK  3,25:  'Schrift  im  unteren  Fenster 

wieder  unsichtbar  machen 


18563] 

3200 

3210 

1  • 

3220 

[582] 

3230 

(2194 ] 

3240 

[528] 

3250 

[918  ] 

3260 

[528] 

3970 

[1036] 

3980 

(11931 

3990 

[13751 

4000 

(12327) 

4010 

(3059] 

(110831 


(91  ] 
(8686] 


[1518] 

(1956] 

[7028] 


(3177] 

(12591 

[37081 

[1252] 
(8481 
[4884 ] 


) 


,wahl$:PEN  1 


'zum  Menue 


»Vokabeln  lernen’ 


WINDOW#2,1 ,40,24,25 

4020  PRINT# 1 , CHR$ ( 24 ) ; SPACES (16) ;CHR$( 24 ) ; 

"  LERNEN  " ;CHR$ ( 24 ) ; SPACE? (16); CHR$ ( 24 ) ; 

4030  PAPER# 2 , 1 : PEN#2 , 0 :CLS#2 

4040  PRINT# 2 , " ;CHR$ ( 243 ) ; "  Vorblaetter 

n" 

4050  PRINT#2 , CHR$ (243);"  Zurueckblae 
ttern  'ENTER* " ;CHR$( 243 ); "  Menue"; 

4060  i=1 :GOTO  4120 

4070  IF  INKEYS =" "THEN  4070 

4080  IF  INKEY ( 39 ) <  >0  AND  INKEY(31)<>0  AND 

INKEY ( 1 8 ) <  >0  AND  INKEY(6)<>0  THEN  4070 

4090  IF  INKEY ( 39 ) =0  THEN  i=i-1:IF  i<=0  THE 

N  i=zeiger-1 

4100  IF  INKEY ( 31 ) =0  THEN  i=i+1:IF  i >=zeige 
r  THEN  i=1 

4110  IF  INKEY < 1 8 ) =0  OR  INKEY(6)=0  THEN  RET 
URN:  'zum  Menue 

4120  CLS: LOCATE  1,3: PRINT"Nr . " ; : PEN  2:PRIN 
T  i : PEN  1 

4130  LOCATE  1 , 7 : PRINT"Fremdwort  :  ";:PEN 

2: PRINT  f remdwortS ( i ): PEN  1 
4140  PRINT:PRINT" Uebersetzung :  ";:PEN  2: PR 
INT  deutsch$( i):PEN  1 
4150  GOTO  4070 


»Abfragen  (D/E)* 


4970 
4980 

4990  '  . . 

5000  GOSUB  5620:  'Unterprogramm  zur  Fenste 
rorganisation 

5010  zeilef $="Deutsche  Bedeutung" 


5020 

zeilea$="Freradwort" 

(3093  1 

5030 

anzahl=0 

5040 

wahl$="" 

[752] 

5050 

WHILE  wähl $3" " 

[2383] 

5060 

CLS 

5070 

GOSUB  9500:  'Vokabel  auswaehlen 

12194] 

5080 

f rage$=deutsch$ ( nummer ) 

(659) 

5090 

antwort$=f remdwortS ( nummer ) 

[840] 

5100 

GOSUB  5370:  'Aufruf  Unterprogramm  T 

[659] 

51 10 

WEND 

[506] 

5120 

GOSUB  5530:  'Aufruf  Unterprogramm  2 

(3985) 

5130 

RETURN:  ’zurueck  zum  Menue 

5170 

[233] 

5180 

'  »Abfragen  (E/D)* 

[2677  ] 

51  90 

[3794  } 

5200 

GOSUB  5620:  'Unterprogramm  zur  Fenste 

rorganisation 

[4467] 

5210 

zeilef $=  Fremdwort 

5220 

zeilea$="Deutsche  Bedeutung" 

[2829] 

5230 

anzahl=0 

5240 

wahl$="" 

[11661 

5250 

WHILE  wahl$=" " 

(31781 

5260 

CLS 

(33621 

5270 

GOSUB  9500:  'Vokabel  auswaehlen 

5280 

frage? =f remdwortS (nummer) 

(1171  ] 

5290 

antwort$=deutsch$ ( nummer ) 

[2109] 

5300 

GOSUB  5370:  'Aufruf  Unterprogramm  1 

[2527] 

5310 

WEND 

5320 

GOSUB  5530:  'Aufruf  Unterprogramm  2 

[1983] 

5330 

RETURN:  'zurueck  zum  Menue 

[14445] 

5340 

'  +++++++++++++++++ 

5350 

'  +Unter  progranun  1  + 

5360 

*  +++++++++++++++++ 

5370 

LOCATE  1 , 3 

5380 

PRINT  zeilef?;":" 

[361  ] 

5390 

PEN  2: PRINT  frage?: PEN  1 

[3892] 

5400 

PRINT: PRINT 

[1983] 

5410 

PRINT  zeilea? ; " : " 

[72721 

5420 

PEN  2 : LINE  INPUT"", eingabeS: PEN  1 :ein 

gabe$=UPPER$ (eingabeS ) 

5425  WHILE  LEFTS ( eingabeS , 1 ) =" 


’:eingabe$= 


[2826  ] 

[743] 

[3822] 

[1712  1 
(2200 1 
[2283] 
(1901  1 
[447] 
[670  ] 
(769) 
[670] 
[506  ] 
[3046] 


(3321  1 

[2740] 

[1417] 

[3461  1 

[898] 

[923] 

[3866] 

(32301 

[1677] 

[24501 

[27301 

[4640] 

[3088] 

[4993 
1528] 
(457  1 
[528] 
(3212} 

[3333  ] 
[1930  ] 
(1761 
[767] 
[1472  ] 
[91  1 
[1883  ] 
[727  ] 
(1650] 
[2417] 
[390] 
(28891 
[2194 ] 
[528] 
(301  ] 
(528] 
[3212] 

[16971 
(17721 
[1763 
[767] 
(1472) 
(91  1 
[1883] 
[1496] 
[1497] 
[2417] 
[390] 
(28891 
[2194] 
[1004  J 
[14701 
[10041 
[6171 
[1062  1 
[21733 
[7431 
[1094  ] 
[4541  1 

[8391 3 


56  CRC  7  '86 


CAL 


MID$ (eingabeS , 2 ) : WEND: WHILE  RIGHT$ ( eingabe 
$,1 )=”  ":eingabe$=LEFT$ (eingabeS, LEN(einga 
be$ ) -1 ) : WEND 

5430  anzahl=anzahl+1 :antanf =1  (1443] 

5432  antend=INSTR(antanf ,antwort$ IF  (50033 
antend=0  THEN  antend=LEN( antwortS )+1 
5434  an ttmp$ = UPPERS (MID$ (an t wort$ , antanf ,a  (12457] 
ntend-antanf ) ) : WHILE  LEFTS ( anttmpS ,1 ) =" 
anttmp$=MID$ ( anttmpS , 2 ) :WEND: WHILE  RIGHTS ( 
anttmpS, 1 )="  ":anttmpS=LEFT$ (anttmpS, LEN(a 
nttmpS } -1 > :WEND 

5436  IF  anttmp$=eingabe$  THEN  INK  3,19,1 :P  19743] 
EN  3: PRINT  TAB ( 1 8 ); "RICHTIG" : richtig=richt 
ig+1 : richtig2=richtig2+1 :vstat%(nummer)=1  : 

GOTO  5450 

5438  IF  antend<=LEN(antwort$)  THEN  antanf=  (3440) 
antend+1 :GOTO  5432 

5440  PRINT: PRINT: INK  3,6,1 :PEN  3:PRINT  TAB  13294] 
(18);  "falsch" :  yp=VPOS ( #0  )  +1 

5445  LOCATE  1,yp:PEN  1 : PRINT"Wiederholen  (  [11175] 
/N)  ?  :  " ; : INPUT"" , wahl$ : IF  wahl$=""THEN 
CLS :anzahl=anzahl-1 :GOTO  5370  ELSE  IF  UPPE 
R$ (wahl$ ) <  >"N"  GOTO  5445 


5450  PRINT: PEN  1 : PRINT"Richtige  Antwort:":  13768] 
PEN  2: PRINT  antwort$:PEN  1 

5460  GOSUB  5750:  'Unterprogramm  Fenster-Ak  [3136] 
tualisierung 

5470  LOCATE  1 ,21 : PRINT"Wei ter  (  /N)  ?  :  (2779) 

5480  PEN  2 : INPUT"", wähl $: PEN  1  [1712] 

5490  RETURN:  'zum  Programmodul  [2419] 

5500  '  ++++  +  ++++++■+++  +++  [1004] 

5510  '  +Unt  er  Programm  2+  [1  456] 

5520  '  +++++++++++++++++  [1004] 

5530  GOSUB  5820:  'Unterprogramm  zur  Benotu  [4651] 

ng  der  Leistung 

5540  statistik(statzeig) =prozent  [1735] 

5550  statzeig=statzeig+1  [1180] 


5560  IF  statzeig >99  THEN  FOR  i%=90  TO  99:h  [14229] 
ilf e(  i%-89  )=statistik( i%) :NEXT:ERASE  stati 
stik:DIM  Statistik (99): FOR  i%=1  TO  10:stat 
istik( i% ) =hilf e( i% ) :NEXT:ERASE  hilf e: statz 
eig=11:  'wenn  Statistik  voll  ist,  dann  loe 
sehen  und  die  letzten  zehn  Werte  uebernehm 


en 

5570  saveflag=1 :  'Da  die  Daten  der  Statist  [7454] 
ik  aktualisiert  wurden,  muss  die  Datei  zum 
Abspeichern  markiert  werden 
5580  RETURN:  'zurueck  ins  entsprechende  Pr  [2686] 
ogrammodul 


5590  '  ++++++++++++++++++++++  [946] 

5600  '  +Abf rage-Info-Fenster+  [1030] 

5610  *  ++++++++++++++++++++++  [946] 

5620  MODE  1  [506] 

5630  richtig=0:prozent=0:anzahl=0:richtig2  [4247] 
=0 :lastnum=0:FOR  i%=1  TO  300:vstat%( i% ) =0: 

NEXT 

5640  WINDOW #0,1 ,40,2,22  [1196] 

5650  WINDOWS  ,1  ,40,1  ,1  [13751 

5660  WINDOW#2 ,1 ,40,23,25: PEN#2 , 0 : PAPER#2 , 1  [3307] 
:CLS#2 

5670  PRINT# 1 , CHR$ ( 24 ) ; SPACES (15); CHR$ ( 24 ) ;  [5360] 
"  ABFRAGEN  " ;CHR$ ( 24 ) ; SPACES ( 1 5 ) ; CHR$ ( 24 ) ; 

5680  PR INT# 2, "Abgefragt  :  "  [1670] 

5690  PRINT#2, "Richtig  :  "  [1424] 

5700  PRINT#2, "Falsch  :  [1774] 

5710  RETURN:  'zurueck  zum  entsprechenden  P  [4118] 
rogramm-Modul 

5720  '  +++++++++++++++++++++++++++++  [1459] 

5730  '  +Info-Fenster-Aktualisierung+  [2341  ] 

5740  '  ++  +  +++  +  +++  +  +++++++++++■*■++++++  [1459] 

5750  LOCATE#2 , 1 2 , 1 : PRINT#2 ,anzahl  [1675] 

5760  LOCATE#2, 10, 2 :PRINT#2, richtig ;: prozen  [66341 
t=richtig/ anzahl »100: PRINT#2 , TAB ( 1 4 ) ; ;U 


SING"### . ## " ; prozent ; : PRINT#2 , "%  " ; 

5770  LOCATE#2 , 1 0 , 3:PRINT#2 , anzahl-richtig;  [5631] 
TAB  ( 1  4  ) ;  "=" ;  USING"###  .ff#";  1  00-prozent ; :  PRI 
NT#2 , "% 

5780  RETURN:  'zurueck  zum  entsprechenden  P  [4118] 
rogramm-Modul 


5790 

'  ++++++++++ 

1446] 

5800 

'  +Benotung+ 

C780  1 

5810 

1  ++++++++++ 

[446] 

5820 

CLS 

(91  ] 

5830 

LOCATE  11,10 

(5091 

5840 

PRINT"Note  :  ";:PEN  3 

[1  340] 

5850  IF  prozent <=10  THEN  INK  3 , 6 , 1 : PRINT"U  [16863] 
NGENUEGEND" : PEN  1 : PRINT: PRINT: PRINT" Ihre  L 
eistung  weist  schwerwiegende  Maen-gel  auf. 


COMPUTER-STUDIO 


Für  JOYCE  und  JOYCE-plus 
und  alle  Schneider  CPC’s 
mit  3”-Diskettenlaufwerk 


FINANZWUNDER-MERCATOR 
DM  477,- 


Die  echte  DIALOG-BUCHHALTUNG  die  Spaß  macht 
exclusiv  für  JOYCE 

*  Auch  für  Österreich,  Schweiz  und  Holland  geeignet!! 

*  Konkurrenz  den  'Großen1  -  Komfort  für  die  'Kleinen' 

*  wahlfreier  Kontenplan,  3-  bis  8-stellige  Konten 

*  Buchen  und  Abfragen  im  Dialog  ohne  Programmwechsel 

*  vom  Journal  bis  zur  Saldenbilanz  und  Rohübersicht 

*  zwei  getrennte  Buchungszeiträume  im  Zugriff 

*  Option:  Offene  Posten-Kunden-Lieferanten-Mahnungen 


LOHNWUNDER-PECUNIA 
DM  577,- 


Komplette  LOHN-/Gehaltsabrechnung  auch  für  die  'Kleinen' 

*  Firma  mit  allen  lohnspezifischen  Daten 

*  5  Krankenkassen  mit  %-Sätzen  und  Bemessungsgrenzen 

*  40  Lohnarten  für  alle  vorkommenden  Abrechnungsmodi 

*  20  Arbeitnehmer  sogar  auf  der  'kleinen'  Diskette 

*  tabellenlose  Lst-Kst-KV-RV-AV  und  Kurzarbeit 

*  für  den  Bau:  SWG,  Wintergeld  und  Urlaubskasse 


Lieferung  auch  von  kompletten  Finanz-  u.  Lohnsystemen 


COMPUTER-STUDIO-OFFEN  BACH 
Kl.  Biergrund  17,  BB5B  Ottenbach  a.M. 
(im  Salzgäßchen  -  Tel.:  069/81  OBI  3) 
Oder  bei  Ihrem  Fachhindler 
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Grafpad  II  [mit  dt.  Handbuch) 

•  Auflösung:  1280  x  1024  Bildpunkte 

•  Abweichung:  ±  1  Pixel 

•  Zeichenfläche:  DIN  A4 

•  hochauflösende  Graphik 

•  Schaltungsdiagramme 

•  Symbol-Bibliothek 

•  CAD  * 

•  Abmessungen:  350  x  260  x  1 2  mm 

Preis:  Kass.  275,-  DM 

Disk.  295-  DM 

•  Optionswahl 

•  Formeingabe 

•  Bilderspeicherung  und  Abruf 

•  Textillustration 
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PIZie-Data,  Inh.:  Hans-Jürgen  Piorreck 
Mittelstraße  61,  4322  Sprockhövel  2, 
Telefon  02339/7191 
Händleranfragen  erwünscht 
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die  in  absehbarer  Zeit  nicht  zubeheben  si 
ndJ  Sie  haben  noch  viel  zu  tun,  packen  Sie 
's  an!" 

5860  IF  prozent <=28  AND  prozent >10  THEN  IN 
K  3,6,1 :PRINT"MANGELHAFT": PEN  1:PRINT:PRIN 
T:PRlNT"Ihre  Leistung  weist  zwar  Maengel  a 
uf,  die  jedoch  durch  vermehrte  Uebungen 
baldbehoben  werden  koennen! " : PRINT"Verlier 
en  Sie  nicht  den  Mut!" 

5870  IF  prozent <=46  AND  prozent >28  THEN  IN 
K  3,21 ,1 :PRINT"AUSREICHEND": PEN  1 : PRINT: PR 
INT: PRlNT"Ihre  Leistung  entspricht  den  Anf 
orderun-gen.  Sie  sind  auf  dem  besten  Wege. 

5880  IF  prozent <=64  AND  prozent >46  THEN  IN 
K  3,21  ,1  :PRINT"BEFRIEDIGEND": PEN  1:PRINT:P 
RINT: PRlNT"Ihre  Leistung  entspricht  voll  d 
en  Anfor-derungen .  Sie  koennen  zufrieden  m 
it  sichsein." 

5890  IF  prozent <=82  AND  prozent >64  THEN  IN 
K  3,26,1: PRINT"GUT" : PEN  1 : PRINT : PRINT : PRIN 
T"Ihre  Leistung  ist  ueberdurchschnittlich 
gut.  Sie  beherrschen  Ihren  Wortschatz  ga 
nz  hervorragend . " 

5900  IF  prozent <=100  AND  prozent >82  THEN  I 
NK  3,26,1 :PRINT"SEHR  GUT":PEN  1:PRINT:PRIN 
T:PRlNT"ihre  Leistung  ist  perfekt.  Sie  koe 
nnen  stolz  auf  sich  sein.  BRAVO 1 " 

5910  PEN  1 :LOCATE  1 3 , 20 : PRINT" < SPACE >  ";CH 
R$ (  243  ) ; "  " ;CHR$ ( 24 ) ; "Menue" ;CHR? ( 24 ) 

5920  IF  INKEY ( 47 )=0  THEN  5920:  'Verhindern 
,  dass  bei  gedrueckt  gehaltener  SPACE-Tast 
e  sofort  zum  Menue  zurueckgekehrt  wird,  oh 
ne  dass  man  die  Benotung  lesen  kann 
5930  IF  INKEY ( 47 ) <  >0  THEN  5930 
5940  RETURN:  1 zurueck  ins  entsprechende  Ab 
f rage-Modul 
5970  '  ***••***• 

5980  '  »Lexikon* 

5990  '  ***••*■?*• 

6000  MODE  1 

6010  WINDOW#1 , 1 ,40,1,1 :WINDOW#0,1 ,40,2,25 
6020  PRINT# 1 ,CHR$ ( 24 ) ; SPACE$ (15); CHR$ (24); 
"  LEXIKON  " ;CHR?( 24 ) ; SPACE$ (16) ;CHR$ (24); 
6030  CLS : LOCATE  1 , 3 : PRINT"Suchbegrif f : " 
6040  gefunden=0 :ausgabe$="" 

6050  PEN  2: LINE  INPUT"" , Vokabel?: PEN  1 
6060  GOSUB  6140:  'Aufruf  Suchroutine 
6070  PRINT :PRINT"Noch  ein  Begriff  (J/  )  ? 

6080  PEN  2 : INPUT"" ,wahl$ : PEN  1 

6090  wähl $=UPPER?(LEFT? (wähl?, 1 ) > : IF  wahl$ 

="J"THEN  6030 

6100  IF  wahl$< >""THEN  6070  ELSE  RETURN:  'z 
um  Menue  oder  zum  Programinodul  "Vokabeln  a 
endern" 

6110  '  +++++++++++++ 

6120  '  +Suchroutine+ 

6130  '  +++++++++++++ 

6140  FOR  i%=1  TO  zeiger-1 

6150  IF  INSTR( deutsch? { i% ) , vokabel$ ) < >0  TH 
EN  ausgabe$=fremdwort? ( i% ) :GOTO  6230:  'zur 
Ausgaberoutine 

6160  IF  IN STR ( f remdwort? { i% ) , Vokabel? ) <  >0 
THEN  ausgabe?=deutsch?( i% ) :GOTO  6230:  'zur 
Au  sgaberou t ine 
6170  NEXT  i% 

6180  IF  gefunden=G  THEN  PRINT: PRINT: PRINT 
TAB (10); "BEGRIFF  NICHT  GEFUNDEN" 

6190  RETURN:  'zurueck  zum  uebergeordneten 
Programm -Modul  "LEXIKON"  oder  "AENDERN" 
6200  '  ++++++++++++++++++++++♦ 

6210  1  +Ausgabe-Unterprogramm+ 

6220  1  +++++++++++++++++++++++ 

6230  PRINT 
6240  gefunden=1 

6250  PRINT"Uebersetzung:":PEN  2: PRINT  ausg 
abe?: PEN  1 

6260  PRINT:PRINT"Weitersuchen  (J/  )  ?  :  "; 

6270  PEN  2: INPUT"", wähl?: PEN  1 ;wahl?=UPPER 

?(LEFT?(wahl?,1 )):IF  wahl?="J"THEN  6170:  ' 

zur  Suchroutine  und  dort  die  Suchschleife 

weiter  durchlaufen 

6280  IF  wähl? < >""THEN  6260 

6290  GOTO  6190:  'zurueck  zur  Suchroutine  u 

nd  dort  zurueck  zum  Menue  oder  zum  Modul  " 

AENDERN" 

6970  '  . . 


6980  '  »Statistik* 

[544  ] 

6990  '  ***»..**.*. 

1332] 

7000  MODE  1 

[506] 

fl  9001  ] 

7010  WINDOW#0,1 ,40,21  ,25 

[1175] 

7020  WINDOW#1 ,1 ,40,1 ,1 

[1375] 

7030  PRINT# 1 , CHR? ( 24 ) ; SPACE? (14); CHR? ( 24 ) ; 

"  STATISTIK  " ; CHR? ( 24 ) ; SPACE? (15); CHR? ( 24 ) 

[3836 ) 

7040  ORIGIN  64,126,0,639,383,80 

[507  ] 

[10737] 

7050  DRAWR  0,240,1;  'y-Achse  zeichnen 

[1436] 

7060  MOVE  0,0 

[4833 

7070  DRAWR  575,0,1:  'x-Achse  zeichnen 

[2612] 

7080  '  x-Achsen-Skalierung 

[1159] 

7090  MOVE  0,4 

[495] 

[1  3996  ] 

7100  FOR  i=57 . 5  TO  575  STEP  57.5 

11  325] 

7110  MOVE  i , 4 : DRAWR  0,-8 

[782] 

7120  NEXT 

[3503 

7130  '  y-Achsen-Skalierung 

[906  ] 

7140  MOVE  4,0 

[499] 

[16690] 

7150  FOR  i%=24  TO  240  STEP  24 

[1411  ) 

7160  MOVE  4, i%: DRAWR  -8,0 

[615] 

7170  NEXT 

[350] 

7180  'y-Achsen-Numerierung 

[1751  ] 

7190  TAG 

[318] 

[10528  ] 

7200  zahl=1 0 

[806  ) 

7210  MOVE  -48 , 8 : PRINT"%" ; 

[1115) 

7220  FOR  i%=30  TO  248  STEP  24 

[1095  1 

7230  MOVE  -80, i% 

[71  7) 

[5801 3 

7240  PRINT  zahl; 

[378  ] 

7250  zahl=zahl+10 

11145] 

[7155] 

7260  NEXT 

1350) 

7270  TAGOFF 

[1066  ] 

7280  PRINT"Durchgefuehrte  Tests:"; 

[2119  3 

[681  ] 

7290  PEN  2: PRINT  stat zeig-1 : PEN  1 

[1987] 

7300  PRINT"Letzter  anzuzeigender  Test:"; 

[4526] 

[2958] 

7310  PEN  2 : PRINT  stat zeig-1 : LOCATE  29,2:IN 
PUT"" ,wahl:wahl=INT(wahl ) : PEN  1 

[4221  ] 

[4181 

7320  IF  wähl >statzeig-1  OR  wahl=0  THEN  wah 

[5882 ] 

[259] 

l=statzeig-1  ELSE  IF  wahl<10  OR  wahl<0  THE 

[418] 

N  wähl =10 

[506] 

7330  IF  statzeig-1 <1 0  THEN  zahl=1 :grenze=s 

[5269] 

[2698] 

tatzeig-1  ELSE  zahl=wahl-9 :grenze=1 0 

7340  '  x-Achsen-Numerierung 

[4577] 

[1889] 

7350  TAG 

[318] 

12438] 

7360  FOR  i=25  TO  559  STEP  58 

[1  648] 

[2038] 

7370  MOVE  i,-1 6: PRINT  zahl; 

[2065] 

[3178] 

7380  zahl=zahl+1 

[11721 

[2704] 

7390  NEXT 

[350] 

[2955] 

7400  TAGOFF 

[1066] 

7410  '  Graphik  erstellen 

[1563] 

(1712  } 

7420  IF  wähl >10  THEN  MOVE  0 , statistik{ wähl 

[3986] 

[2944  ) 

-grenze) *2.4  ELSE  MOVE  0,0 

7430  FOR  i=1  TO  grenze 

[1001  J 

[5653] 

7440  DRAW  i *57 . 5 , Statistik ( wahl-grenze+i ) * 
2.4,3 

[2899  ) 

7450  NEXT 

[3501 

[583] 

7460  '  Statistik  erstellen 

[788  } 

[783] 

7470  durchschnitt=0 :gut  =  0: schlechte  00 

[1643  1 

[583] 

7480  FOR  i%=1  TO  statzeig-1 

[1035  3 

[1238] 

7490  IF  statistik( i% ) >gut  THEN  gut=statist 

[2867  3 

[45503 

ik ( i% ) 

7500  IF  statistik( i% ) «schlecht  THEN  schlec 
ht=statistik( i%) 

[41  28  1 

[6577] 

751  0  durchschnitt=durchschnitt+statistik{ i 
%) 

7520  NEXT 

[2235] 

[457] 

[350  ] 

7530  durchschnitt =durchschnitt/ (statzeig-1 

[2336] 

[3898] 

) 

7540  CLS 

[91  ] 

[5682] 

7550  PRINT"Tests : " ; 

11105) 

[862] 

7560  PEN  2: PRINT  statzeig-1 : PEN  1 

[1987  ) 

7570  PRlNT"Bester  Test  :"; 

[1748  1 

12313] 

7580  PEN  2  :  PRINT  USING"  ###  .  ff#  "  ;gut ; :  PRINT" 

[1782] 

[862] 

% " : PEN  1 

[361  ] 

7590  PRINT"Schlechtester : " ; 

[23643 

[1165] 

7600  PEN  2 : PRINT  USING"### schlecht ;: P 

[1846  ] 

[5368] 

RINT"% " : PEN  1 

7610  PRINT"Durchschnitt  :"; 

[1963  ] 

[2823] 

7620  PEN  2: PRINT  USING"### . ##" ;durchschnit 

(3233  ) 

[10073] 

t ; : PRINT" %" : PEN  1 

7630  PRlNT"Noch  eine  Kurve  ?  (J/  )  :  "; 

[3010  1 

[1026] 

7640  PEN  2: INPUT"", wähl?: PEN  1 : wahl?=UPPER 
? (LEFT? (wähl? ,1 )) 

[3680  ) 

7650  IF  wah 1 ? = " J " TH  EN  7000 

[101  4) 

[3871  ] 

7660  IF  wahl?<>""THEN  7540 

(883] 

7670  RETURN:  'zurueck  zum  Menue 

[2194 1 

7970  '  . * . 

[5023 

[3323 

7980  '  ‘Ausdrucken* 

(778) 

III  III 
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7990  '  •**•***•**•*  £5021 

8000  PRINT#8,dateinarne$  [1  503] 

8010  PRINT08, STRINGS (LEN(dateiname$ [1592] 
8020  PRINT08  [343] 

8030  FOR  i%=1  TO  zeiger-1  [1238] 

8040  PRINT#8 , f remdwort$  < i% ) ; "  :  [2059] 

8050  PRINT#8,deutsch$(i%)  [912] 

8060  PRINT#8  [343] 

8070  NEXT  i%  [457] 

8080  PRINT#8 : PRINT#8 : PRINT#8  [1827] 

8090  RETURN:  'zurueck  zum  Menue  [2194] 

8970  '  . . •••*••,  [670] 

8980  *  •Schluss-Routine*  [833] 

8990  '  ••••••••••••••••*  [6701 

9000  MODE  1  [506] 

9010  WINDOW#0,1 ,40,2,25  [1193) 

9020  WINDOW#1 ,1 ,40,1  ,1  [1375] 

9030  INK  0,13: INK  1,1 5: INK  2 , 1 4 : PEN  1  [1455] 


9040  PRINT#1 , CHR$ (24); SPACE$ (12); CHR$ (24);  [5271] 
"  SCHLUSS-MENUE  " ; CHR$ ( 24 ) ; SPACE$ ( 1 3 ) ; CHR$ 

(24); 

9050  IF  savef lag  THEN  GOSUB  9200:  'Unterpr  [6325] 
ogramm  zum  Abspeichern  der  Vokabeln  und  de 
r  Statistik 

9060  CLS  [91  ] 

9070  LOCATE  1 4 , 1 2 : PRINT" [E ) . Ende"  [3072] 

9080  LOCATE  1 4 , 1 4 : PRINT" (N J . Neubeginn"  [3398] 

9090  LOCATE  1 4 , 1 6 : PRINT" [M ) . Menue"  [2320] 

9100  LOCATE  5 , 23 : PRINT" Ihre  Wahl  :  [2247] 

9110  PEN  2: INPUT"" ,wahl$:PEN  1  [1712] 

9120  wahl$=UPPER$ (LEFT$ (wahl$ ,  1  ))  [2200] 

9130  IF  wähl $="E"THEN  MODE  1 : INK  0,1: INK  1  15033] 

,24: INK  2,20: INK  3, 6: PEN  1 :BORDER  1: PAPER 
0: CLS: END 

9140  IF  wahl$="N"THEN  RUN:  'Daten  loeschen  [3052] 
und  neu  beginnen 

9150  IF  wahl$="M"THEN  MODE  2: INK  0,1: INK  1  £5783] 
,25: INK  2, 20: PAPER  0: RETURN:  'zum  Menue  zu 


ru eckkehren 

9160  GOTO  9060  [500] 

9170  ’  +++++++++++++++++++++++++++  [1289] 

9180  1  +Unterprogramm  Abspeichern+  [2396] 

9190  '  ++++  +  +  +  +  +  -*■++++  ++++++++  +  +  +  +  +  [1289] 


9200  CLS  [91  ] 

9210  LOCATE  1,10: PRINT"Die  Datei  muss  auf  [113971 
ein  externes  Medium  gesichert  werden,  da 
Ergaenzungen  vorge-nommen  worden  sind." 

9220  PRINT : PRINT  TAB(9) ; "Dateiname  :  ";dat  [2873) 
einame$: LOCATE  21,1.4 

9230  PEN  2 : INPUT"" ,eingabe$ : PEN  1  [1956] 

9240  IF  LEN(eingabe$) >8  THEN  9200:  'Kompat  [5277] 
ibilitaet  zur  Diskettenstation  gewaehrleis 
ten 

9250  IF  eingabe$ <  >""THEN  eingabe$=UPPER$ (e  [10476] 
ingabeS )  +  " . VOK" : dateiname$=eingabe$ :  1  Date 
i  wird  unter  neuem  Namen  abgespeichert.  Be 
i  < ENTER >  wird  der  alte  Name  genommen. 

9260  OPENOUT  dateinameS  [1374] 

9270  PRINT : PRINT" <" ;dateiname$ ; " >  wird  abg  (33591 
espeichert. . 

9280  PRINTÄI9, zeiger  [1266  1 

9290  PRINT09 ,statzeig  [16551 

9300  FOR  i%=1  TO  zeiger-1 : PRINT#9 , fremdwor  [3745) 
t$ ( i% ) : PRINT09 ,deutsch$ ( i % ) :NEXT 
9310  FOR  i%=1  TO  statzeig-1 :PRINT#9,statis  [1743] 


tik(i% ) :NEXT 

9320  saveflag=0:  'Datei  ist  abgespeichert  [2318] 
9330  CLOSEOUT  [902] 

9340  RETURN:  'zurueck  zum  "Schluss"-Modul  [4259) 
oder  zum  Lade-Modul 

9470  * ++++++++++++++++++++++  [946] 

9480  '+  Vokabel  auswaehlen  +  (1876) 

9490  ' ++++  +  +  +  +  ++++  +  +  +  +  +++++  +  [946] 


9500  IF  richtig2<INT(zeiger/1 .5)  THEN  GOTO  [3487] 
9540 

9510  IF  richtig2=zeiger-1  THEN  FOR  i%=1  TO  [57931 
300 :vstat%( i% ) =0: NEXT :richtig2=0: GOTO  954 

0 

9520  nummer=lastnum+1 :WHILE  vstat% ( nummer )  [5532] 
>0 : nummer =nummer+1 : IF  nummer=zeiger  THEN  n 
ummer =1 

9530  WEND : GOTO  9550  [1104) 

9540  nummer =INT(RND* (zeiger-1 ) ) +1 : IF  vstat  [3216] 
%{nummer)>0  OR  nummer=lastnum  THEN  GOTO  95 
40 

9550  lastnum=nummer : RETURN  [1468] 


Sic  wollen  uns  ein  Programm  zusenden?  Folgende  Regeln  sollten  Sie  beachten: 


1)  Schicken  Sie  Ihre  Programme  auf 
Kassette  oder  Diskette.  Dabei  mehr¬ 
mals  hintereinander  abspeichern. 

2)  Legen  Sie  eine  ausführliche  Pro¬ 
gram  mbeschreibung  bei,  aus  der  ein¬ 
deutig  der  Sinn  und  Zweck  des  Pro- 
grainmes  hervorgeht.  Eine  Varia- 
blenliste  ist  sehr  wichtig,  in  ihr 
sollten  alle  im  Programm  definierten 
Variablen  mit  ihrer  Verwendung  auf- 
geführl  sein. 

Beispiel:  nS  =  Nachname 
g  =  glücklicher  usw. 

3)  Wenn  Sie  gleichzeitig  Besitzer  eines 
Druckers  sind,  schicken  Sie  auf  je¬ 
den  Fall  ein  Programmlisting  mit. 

4)  Vergessen  Sie  Ihren  Absender  nicht! 
Vollständige  Anschrift,  wen  n  möglich 
auch  die  Telefonnummer,  ersparen 
unnötige  Verzögerungen  bei  even¬ 
tuellen  Nachfragen  unsererseits. 

5)  Behalten  Sie  auf  jeden  Fall  eine  Ko¬ 
pie  Ihres  Programmes,  unvorherseh¬ 
bare  Umstände,  wie  z.B.  Bandriß  der 


Kassette,  werden  somit  nicht  zur 
Katastrophe. 

6 )  We  n  n  S  ie  soga  r  me  h  re  re  Progra  in  m  e 
geschrieben  haben  und  diese  veröf¬ 
fentlichen  wollen,  nehmen  Sie  bitte 
lur  jedes  Programm  eine  separate 
Kassette  (mehrmals  abspeichern!). 

Damit  erleichtern  Sie  unsere  Arbeit 
wesentlich  und  eine  schnellere  Bear¬ 
beitung  wird  möglich. 

7)  Versehen  Sie  das  Programm  mit  den 
sehr  wichtigen  REM-Statements. 
Das  fördert  nicht  nur  die  Übersicht 
für  uns  und  unsere  Leser,  sondern 
unterstützt  zusätzlich  das  struktu¬ 
rierte  Programmieren.  Merke:  Auch 
e  rtä  h  ren  e  P  rog  r a  m  m  ie  rer  ve  rwe  n  de  n 
REM-Zeilen.  das  Programm  sollte 
schließlich  jeder  verstehen  und  an¬ 
wenden  können. 

8)  Vermeiden  Sie  möglichst  Variablen¬ 
namen.  wo  leicht  I  und  i  oderö  undo 
verwechselt  werden  können.  Varia¬ 
blen  sollten  grundsätzlich  in  Klein¬ 


buchstaben  geschrieben  werden  und 
möglichst  verständlich  sein.  Die 
Variable  butter  sagt  mehr  aus,  als  nur 
bu. 

9)  Bieten  Sie  das  Programm  niemals 
verschiedenen  Verlagen  gleichzeitig 
an!  M  i  t  der  Veröffent!  ich  ung  und  dem 
daraus  resultierenden  Honorar,  ge¬ 
hen  die  Llrheberrechte  an  den  Verlag 
über!  Sollte  Ihr  Programm  dann  noch 
in  einer  anderen  Zeitschrift  ab- 
gedruckt  werden,  liegt  ein  Verstoß 
gegen  das  Wettbewerbsrecht  vor. 

10)  Jedes  bei  uns  ordnungsgemäß  einge- 
gangene  Programm  wird  ausführlich 
begutachtet  und  getestet.  Sie  er¬ 
halten  von  uns  dann  umgehend  Be¬ 
scheid.  ob  Ihr  Programm  veröffent¬ 
licht  wird  oder  nicht.  Wenn  Sie  das 
Programm  nach  unserer  Begutach¬ 
tung  zurückhaben  wollen,  legen  Sie 
bitte  der  Einsendung  einen  frankier¬ 
ten  u  nd  adressierten  Rüekumschlag 
bei.  Die  Kosten  einer  eventuellen 
Rücksendungsind  in  jedem  Fall  vom 
Einsender  zu  tragen. 


Falls  wir  uns  für  den  Abdruck  Ihres  Programmes  entschieden  haben,  setzen  wir  uns  unverzüglich  mit  Ihnen  in  Verbindung  und  be¬ 
sprechen  Ihr  verdientes  Honorar! 

Übrigens  w äre  es  nett,  w  enn  Sie  uns  auch  ein  paar  persönliche  Daten  schreiben  würden  (z.  B.  Ihr  Alter,  T  ätigkeit,  w ie  und  wann  kam 
die  Idee  zu  dem  Programm,  was  alles  machen  Sie  mit  dem  CRC  usw.?).  So,  jetzt  aber  genug  der  Theorie,  mit  fast  unerträglicher 
Spannung  und  Neugier  wartet  Ihre  „Schneider  CPC  international'’  auf  Ihre  Beiträge. 

Einsendungen  bitte  an:  DMV  -  Daten  &  Medien  Verlagsges.mbH,  Fuldaer  Straße  6,  3440  Eschwege 
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Es  ist  nun  an  der  Zeit,  daß  Sie  als  ange¬ 
hende  Hardwareprofis  Ihren  Lötkolben 
anheizen  sollten.  Nachdem  wir  uns  in 
der  letzten  Ausgabe  der  leidigen 
Theorie  zuwenden  mußten,  geht  es  in 
diesem  Beitrag  um  ein  universelles  Ein- 
/Ausgabeinterface,  das  uns  in  weiteren 
Beiträgen  noch  begegnen  wird;  als 
Leckerbissen  schließt  sich  eine  vollwer¬ 
tige  Centronicsschnittstelle  mit  Trei¬ 
berprogramm  an. 

Beim  Entwurf  der  ersten  Platine  traf 
ich  auf  das  Problem,  wie  diese  und 
weitere  Platinen  sinnvoll  verbunden 
werden  könnten.  Ich  habe  mich  für 
ein  sogenanntes  19”-Tischgehäuse 
entschieden,  welches  als  Rahmen 
schon  für  etwa  50,-  DM  zu  bekom¬ 
men  ist.  An  der  Rückwand  des  Ge¬ 
häuses  befindet  sich  eine  Grundpla¬ 
tine  mit  mehreren  Steckplätzen,  in 
welche  unsere  Platinen  eingesteckt 
werden  können.  Zu  diesem  Thema 
werden  zu  gegebener  Zeit  weitere 
Informationen  folgen.  Eine  einfache 
Basisplatine  (Steckmöglichkeit  für 
max.  fünf  Karten  am  Schneiderbus) 
können  Sie  sich  sehr  leicht  herstellen, 
indem  Sie  die  Anschlüsse  des  CPC- 
Expansionports  nach  Tabelle  1  auf 
die  entsprechenden  Pins  der  im  ECB- 
Bus  verwendeten  64-poligen  VG-  Fe¬ 
derleiste  legen. 

Die  Basisplatine  und  die  Centronics¬ 
schnittstelle  sind  sowohl  als  Platine, 
als  auch  als  bestückte  und  geprüfte 
Geräte  über  unseren  Platinenservice 
per  Bestellkarte  erhältlich.  Versierten 
Bastlern  wird  das  Layout  der  Centro- 
nics-Karte  als  Vorlage  dienen  kön¬ 
nen.  Da  die  Basisplatine  beidseitig 
beschichtet  und  durchkontaktiert  ist. 
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haben  wir  die  Layouts  nicht  abge- 
druckt;  interessierte  Leser  können  die 
Vorlagen  gegen  Rückporto  und  DM 
0,40  in  Briefmarken  beim  Verlag  er¬ 
halten.  Die  benötigten  Stecker  und 
Flachkabel  sind  Standard  und  bei  je¬ 
dem  guten  Fachversand  erhältlich. 
Für  Besitzer  des  464  mit  Floppylauf- 
werk  kommt  noch  eine  Änderung 
hinzu. 

Sie  müssen  sich  eine  Steckmöglich¬ 
keit  an  Ihrem  Controller  schaffen 
(Achtung!  Garantieverlust!).  Sie  öff¬ 
nen  die  Rückwand  Ihres  Controllers 
und  löten  eine  50-polige  Platinenbuch¬ 
se  spiegelverkehrt  auf  die  Lötseite  der 
Controllerplatine  parallel  der  vor¬ 
handenen  Steckerleiste.  Nun  fertigen 
Sie  noch  einen  entsprechenden  Aus¬ 
schnitt  an  und  schrauben  den  Deckel 
vorsichtig  wieder  an. 

Jetzt  kommt  noch  ein  Zwischenstück 
(klei  ner  Platinenrest,  der  doppelseitig 
Leiterbahnen  im  Raster  des  Expan¬ 
sionsports  Ihres  Schneider  besitzt)  in 
die  Buchse.  Der  Stecker  wird  genauso 
gesteckt  wie  am  Computer  -  fertig  ist 
die  Verbindung. 

Nun  braucht  sich  der  Controller  kei¬ 
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Pinbelegung  CPC 

Pinbelegung  ECB 

oben 

unten 

C 

A 

1  Sound 

2  GND 

1  +5V 

1  +5V 

3  Al  5 

4  A14 

2  DO 

2  D5 

5  Al  3 

6  Al  2 

3  D7 

3  D6 

7  All 

8  A10 

4  D2 

4  D3 

9  A9 

10  A8 

5  A0 

5  D4 

11  A7 

12  A6 

6  A3 

6  A2 

13  A5 

14  A4 

7  Al 

7  A4 

15  A3 

16  A2 

8  A8 

8  A5 

17  Al 

18  A0 

9  A7 

9  A6 

19  D7 

20  D6 

10 

10  READY 

21  D5 

22  D4 

11  RAMRD 

11  BUSREQ 

23  D3 

24  D2 

12  RAMDIS 

12 

25  Dl 

26  DO 

13 

13  +12V 

27  +5V 

28  MREQ 

14  Dl 

14 

29  Ml 

30  RFSH 

15  -12V 

15  EXP 

31  IOREQ 

32  RD 

16  LPEN 

16  HALT 

33  WR 

34  HALT 

17  All 

17 

35  INT 

36  NMI 

18  A10 

18  A14 

37  BUSRD 

38  BUSAK 

19  ROMEN 

19 

39  READY 

40  BUSRESET 

20  NMI 

20  SOUND 

41  RESET 

42  ROMEN 

21  ROMDIS 

21 

43  ROMDIS 

44  RAMRD 

22  WR 

22  Ml 

45  RAMDIS 

46  CURSOR 

23  INT 

23 

47  LPEN 

48  EXP 

24  RD 

24  +5V  ACCU 

49  GND 

50  CLOCK 

25  CURSOR 

25 

26  RESET 

26 

27  Al 2 

27  IOREQ 

28  Al 5 

28  RFSH 

29  CLOCK 

29  Al  3 

30  MREQ 

30  A9 

31  BUSRESET 

31  BUSAK 

Tabelle  1  ECB- Anschlußbelegung 

32  GND 

32  GND 

nen  neuen  Platz  zu  suchen.  Die  Basis¬ 
platine  besitzt  wie  alle  anderen  Kar¬ 
ten  Europaformat  (100  x  160  mm).  Sie 
wird  über  ein  50-poliges  Flachband¬ 
kabel  mit  dem  Computer  verbunden. 
Sie  ist  mit  64-poligen  VG  Federleisten 
ausgerüstet;  die  Erweiterungskarten 
enthalten  die  dazugehörigen  Messer¬ 
leisten.  Diese  Verbindungsart  wird 
auch  bei  Profis  gerne  verwendet  Das 
geht  sogar  soweit,  daß  man  einen 
eigenen  Anschlußstandard  mit  die¬ 
sen  Steckverbindungen  entwickelte. 
Diese  Anschlußbelegung,  die  weitge¬ 
hend  dem  ECB-Bus  entspricht,  habe 
ich  hier  gewählt.  Der  ECB-Bus  bietet 
außer  dem  kompakten  Aufbau  den 
großen  Vorteil,  daß  Sie  alle  im  Rah¬ 
men  dieser  Serie  entwickelten  Bau¬ 
steine  auch  an  anderen  Z80- 
Rechnern  benutzen  können,  indem 
Sie  nur  die  Basisplatine  austauschen. 
Auch  werden  in  Fachzeitschriften 
zunehmend  Erweiterungen  für  dieses 
Bussystem  angeboten. 
Selbstverständlich  können  die  Er¬ 
weiterungskarten,  wie  schon  mehr¬ 
fach  erwähnt,  auch  allein  am  CPC 
betrieben  werden.  Sie  benötigen  nur 


eine  kleine  Platine,  die  die  An¬ 
schlüsse  des  Schneiders  auf  die  An¬ 
schlüsse  der  VG-Leiste  konvertiert. 
Denn  um  (Ihr)  Geld  zu  sparen,  sind 
alle  Platinenstecker  gleich  aufgebaut. 


BYTE  für  BYTE 


Wenn  Sie  aufmerksam  den  letzten 
Artikel  über  Adressdecodierung  gele¬ 
sen  haben,  wissen  Sie  bestens  über 


I/O- 

Adresse 

Ausgabe 

Eingabe 

F8xx 

ext . Bus 

ext . Bus 

F9xx 

H 

1 1 

FAxx 

M 

■  i 

FBxx 

•  1 

i  • 

xxEO 

Verfügbar  für 
Anwender  - 

xxFE 

Peripherie 

Tabelle  2  Verfügbare  Portadressen 
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Die  SCHNEIDERWARE  ist  ein 
universelles  Erweiterungssystem 
für  alle  CPC's  auf  der  Basis  des 
bekannten  ECB-Bussystems. 
Dieses  System  läßt  sich  mit  mi¬ 
nimalen  Adaptionsmaßnahmen 
an  alle  Rechner  mit  Z80-CPU 
anschließen.  Für  Ihren  CPC 
brauchen  Sie  zunächst: 

1.  Das  passende  Kabel  (im  Ar¬ 
tikel  beschrieben;  wird  im 
Platinenservice  angeboten) 


Basisplatine: 

Die  Basisplatine  enthält  Slots  zur  Auf¬ 
nahme  von  maximal  fünf  einzelnen  Kar¬ 
ten.  Sie  ist  beidseitig  beschichtet  und 
kann  über  den  Rechner  oder  eine  externe 
Spannungsquelle (-I-5V /±  1 2V)  die  Kar¬ 
ten  versorgen.  Bei  einem  schon  vorhan¬ 
denen  ECB-Bus  wird  diese  Karte  nicht 
benötigt. 

Die  Preise: 

Platine,  unbestückt  24,90 

Karte,  geprüft  62,90 


Centronics 


2.  Die  Basisplatine  (zur  Umset¬ 
zung  der  Pinbelegung  CPC / 
ECB). 

Im  Lauf  der  Serie  wird  für  Ein¬ 
steiger  der  Aufbau  eines  19”- 
Systems  und  die  Integration  der 
Karten  in  dieses  Gehäuse  be¬ 
schrieben.  Die  Basisplatine  be¬ 
steht  aus  beidseitig  kupferbe¬ 
schichtetem  glasfaserverstärktem 
Epoxydharz  und  ist  durchkon¬ 
taktiert.  Die  Einsteckkarten  sind 
einseitig  beschichtet  und  aus 
dem  gleichen  Material  wie  die 
Basisplatine.  Die  in  den  Fertig¬ 
geräten  verwendeten  Bausteine 
sind  von  bester  Qualität;  die 
fertigen  Geräte  sind  geprüft.  Die 
in  Heft  7  vorgestellte  Centronics- 
Parallelschnittstelle  ist  gegen¬ 
über  dem  CPC-Druckerport  voll¬ 
ständig  und  vollkompatibel  zu 
allen  Geräten  mit  Centronics- 
Anschluß. 

Zahlungsbedingungen: 


Diese  Karte  ist  eine  vollwertige  8-Bit- 
Parallelschnittstelle  nach  Centronics- 
Standard.  Jegliche  kommerzielle  Peri¬ 
pherie  arbeitet  problemlos  mit  dieser 
Karte  zusammen.  Die  Software  zu  dieser 
Schnittstelle  ist  in  Heft  7/86  ab¬ 
gedruckt.  Die  Karte  kann  direkt  in  ein 
ECB-Bussystem  eingesteckt  werden 
und  ist  mit  angepaßter  Software  auf  al¬ 
len  Z8G-Rechnern  lauffähig 

Die  Preise: 

Platine,  unbestückt  17,90 

Karte,  geprüft  79,90 


Kabel 


Die  Basisplatine  der  SCHNEIDERWARE 
wird  mit  einem  50-poligen  Kabel  an  die 
CPC's  angeschlossen.  Hierzu  eignet  sich 
ein  Flachbandkabel,  an  welches  die  ent¬ 
sprechenden  Stecker  in  Schneidklemm¬ 
technik  angequetscht  werden.  Die  benö¬ 
tigten  Stecker  sind  im  Artikel  in  Heft  7/86 
beschrieben.  Das  fertige  Kabel  für  Ihren 
Rechner  können  Sie  über  den  Platinen¬ 
service  beziehen. 

Die  Preise: 

Kabel  für  464/664  35,90 

Kabel  für  61 28  45.90 


Gesamtpreis  zuzüglich  5,-  DM 
Porto/Verpackung  (im  Ausland 
8  -  DM  Porto/Verpackung) 

Am  einfachsten  per  Vorkasse 
(Verrechnungsscheck)  oder  als 
Nachnahme  zuzügl.  der  Nach¬ 
nahmegebühr  (in  das  Ausland 
nicht  möglich). 


Bitte  Postkarte  im 
Heft  benutzen! 


Platine,  unbestückt 


SCHNEIDERWARE  ist  in  drei  Versionen 
für  Sie  verfügbar.  Sie  können  nach  Bau¬ 
plan  selbst  bauen,  die  fertig  bestückten 
und  geprüften  Karten  über  den  Platinen¬ 
service  erhalten  oder  die  unbestückte 
Platine  erwerben.  Diese  werden  in 
Industriequalität  gefertigt,  sind  verzinnt 
und  gebohrt;  doppelseitig  beschichtete 
Platinen  sind  chemisch  durchkontak¬ 
tiert  und  geprüft.  Hierbei  haben  Sie  den 
Vorteil,  die  Platine  nicht  selbst  herstellen 
zu  müssen,  jedoch  die  Bestückungsko¬ 
sten  zu  sparen  und  die  Bauteile  selbst 
einzukaufen. 


Schneider  CPC  International 

Postfach  250,  3440  Eschwege 


die  Erzeugung  eines  Auswahlsignals 
(-CS-)  Bescheid.  Da  die  CPC’s  für 
ihren  internen  Ablauf  ebenfalls  eine 
Reihe  solcher  Signale  benötigen,  die 
aber  alle  nicht  vollständig  decodiert 
wurden  (aus  welchen  Gründen  auch 
immer),'  müssen  wir,  um  möglichst 
einen  großen  Bereich  zur  Verfügung 
zu  haben,  die  benötigten  Adressen 
selbst  decodieren. 

Tabelle  2  stellt  den  im  Schneider  ver¬ 
fügbaren  Adressraum  für  I/O- 
Operationen,  die  wir  als  Anwender 
für  Peripheriegeräte  zur  Verfügung 
haben,  dar.  Demnach  stehen  uns 
uneingeschränkt  4  mal  32  =  128  Adres¬ 
sen  zur  Verfügung.  Die  oberen  vier  Bit 
(A12  -  A15)  sind  hierbei  immer  high 
(&F).  Die  nächste  Vierergruppe  (A8- 
A1 1)  kann  die  Werte  &8,  &9,  &A  und 
&B  annehmen.  Für  das  untere  Byte 
(AO  -  A7)  stehen  dem  Anwender 
gemäß  Firmwarehandbuch  von 
Schneider  die  Adressen  &E0  -  &FF 
zur  Verfügung.  Wir  werden  uns  genau 
an  diese  Angaben  halten,  um  nicht 
einem  Profientwickler,  der  Ihnen 
vielleicht  einen  Lightpen  verkaufen 
möchte,  ins  Gehege  zu  kommen. 
Wenn  Sie  das  Schaltbild  betrachten, 
erkennen  Sie  als  alte  Decodierprofis 
den  bekannten  Teil  der  Decodier¬ 
logik.  Die  Adressen  A6  (74154),  A5 
(74138)  -Al 5  werden  diesmal  mit  in 
die  Decodierung  einbezogen.  Zwei 
Bit(A0,  Al)  benötigen  wir  für  die  PTO 
(programmierbare  Ein-/Ausgabeein¬ 
heit),  die  zwei  anwählbare  Register 
(Speicherstellen)  besitzt.  Mit  den  ver¬ 
bleibenden  Adressen  (A2  -  A4  bzw. 
A5)  wählt  der  Decoder  74138  bzw. 
74154  sieben  oder  sechzehn  einzelne 
Adressen  aus.  Dadurch  ergibt  sich  für 
uns  die  Möglichkeit,  bei  Einsatz  des 
Decoders  74138,  zwei  Karten  anzu¬ 
sprechen,  je  nach  Belegung  der  Jum¬ 
per  A  oder  B. 

Bei  Verwendung  des  Decoders  74154 
können  wir  vier  Karten  der  gleichen 
Bauart  ansprechen.  Tabelle  3  zeigt 
Ihnen  die  entsprechenden  Adressen 
und  ihre  Bedeutung. 


741541 

5 

432 

10 

741381 

5 

432 

10 

F8E0 

1111100011 

1 

000 

00 

F8E1 

1 

000 

01 

1 

1 

F8E2 

1 

000 

10 

F8E3 

1 

000 

11 

F8E4 

1 

001 

00 

F8E5 

1 

001 

01 

F8E6 

1 

001 

10 

z 

z 

F8E7 

1 

001 

11 

F8E8 

1 

010 

00 

F8E9 

1 

010 

01 

F8EA 

1 

010 

10 

J 

F8EB 

1 

010 

11 

F8EC 

1 

011 

00 

F8ED 

1 

011 

01 

/, 

F8EE 

1 

011 

10 

F8EF 

1 

011 

11 

Tabelle  3  Adressräume  der  Decoder 


Steuerwort 

HEX 

Kanal 

A 

Kanal 

ß 

Kanal 
C  hi 

Kanal 
C  lo 

80 

A 

A 

A 

A 

81 

A 

A 

A 

E 

88 

A 

A 

E 

A 

89 

A 

A 

E 

E 

82 

A 

E 

A 

A 

83 

A 

E 

A 

E 

8A 

A 

E 

E 

A 

8B 

A 

E 

E 

E 

90 

E 

A 

A 

A 

91 

E 

A 

A 

E 

98 

E 

A 

E 

A 

99 

E 

A 

E 

E 

92 

E 

E 

A 

A 

93 

E 

E 

A 

E 

9A 

E 

E 

E 

A 

9B 

E 

E 

E 

E 

Tabelle  4  Steuerworte  des  8255 


Ein-/ Ausgabe  ganz  einfach 


Bevor  wir  zum  eigentlichen  Kern  der 
Sache,  der  8255  PIO,  kommen, 
möchte  ich  Sie  kurz  in  die  Welt  der 
einfachen  Port-Ein-/Ausgabe  ent¬ 
führen.  Mit  einem  "OUT  &ADR, 
&WERT"  kann  man  bequem  von 
Basic  aus  dem  Datenbus  (DO  -  D7) 
einen  Wert  übergeben.  Dieser  Zahlen- 


. Hardware1 

wert  wird  bei  entsprechender  Deco¬ 
dierung  an  die  durch  die  Variable 
spezifizierte  Adresse  ausgegeben.  Die 
Adresse  definiert  uns  ein  -CS-Signal, 
das  einen  Eingang  eines  IC’s  auf 
einen  bestimmten  Pegel  legt  (mei¬ 
stens  LOW).  Dieser  Baustein  erkennt 
nun  dieses  Signal  und  weiß,  daß 
genau  in  diesem  Moment  gültige  Da¬ 
ten  am  Datenbus  anliegen.  Ob  er  nun 
Daten  vom  Datenbus  holen  soll 
(Ausgabe)  oder  Daten,  die  ihm  an  sei¬ 
nen  Eingängen  angeboten  werden, 
an  den  Datenbus  geben  soll  (Ein¬ 
gabe),  wird  ihm  mit  den  beiden 
Signalen  -RD-(read-lesen)  und  -WR- 
(write-schreiben)  mitgeteilt.  Da  die 
Daten  nur  für  sehr  kurze  Zeit  verfüg¬ 
bar  sind,  müssen  die  Ausgabebau¬ 
steine  Speichercharakter  besitzen. 
Bei  den  Eingabebausteinen  trifft  das 
nicht  unbedingt  zu,  denn  hier  bestim¬ 
men  Sie  als  Entwickler  (Anwender), 
wie  lange  die  Eingabedaten  (z.B 
drücken  einer  Taste)  verfügbar  sind. 
Geeignete  Bausteine  für  diese  Auf¬ 
gabe  sind  die  IC’s  74244  (Eingabe) 
und  74273  (Ausgabe).  Letzterer  fristet 
auch  im  CPC  sein  Dasein.  Er  wird 
hier  als  abgemagerte  Centronics- 
schnittstelle  "verbraten”.  Einfache 
Ein-/ Ausgabeschaltungen  kann  man 
nach  dem  Schema  in  Bild  3  reali¬ 
sieren. 


Das  Arbeitstier  8255 


Ein  wesentlich  leistungsfähigeres  IC 
ist  der  programmierbare  Interface- 
Baustein  vom  Typ  8255.  Dieser  Chip 
besitzt  bemerkenswerte  Features.  Sie 
können  aus  der  Anschlußbelegung 
(Bild  4)  die  Anschlußgruppen  (Ka¬ 
näle  A,  B,  C)  erkennen.  Diese  Pins 
repräsentieren  universelle  I/O-Ports. 
Das  bedeutet,  daß  die  Ports  als 
Ausgabe-  und/oder  Eingabeport  pro¬ 
grammiert  werden  können.  Den  Ka¬ 
nal  C  kann  man  sogar  4-Bit-weise 
(z.B.CO-3  =  Eingang,  C4-7  =  Aus¬ 
gang)  definieren.  Jetzt  wird  Ihnen 


Bild  3  E/A  Schaltungsschema 
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Bild  4  Anschlußbelegung  8255 
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Tabelle  5  Aujbau  der  Steuerworte 


GRUPPE 


B  - 


PORT  C,  untere  4  Bits: 
1  =  EINGANG 
0  r  AUSGANG 


PORT  B  : 

1  *  EINGANG 
0  =  AUSGANG 


BETRIEB SA RTENDE FINITION: 
0  =  BETRIEBSART  -  0  - 
1  =  BETRIEBSART  -  1  - 


GRUPPE  -  A  - 
PORT  C,  obere  4  Bits: 

1  =  EINGANG 
0  «  AUSGANG 


PORT  A  : 

1  »  EINGANG 
0  =  AUSGANG 


BETRIEB SA RTENDE FINITION: 
00  =  BETRIEBSART  0 
01  =  BETRIEBSART  1 
1*  =  BETRIEBSART  2 


KENNBIT  FÜRDEFINIEREN  DER 
BETRIEBSART: 

1  -  BETRIEBSART  DEFINIEREN 
0  =  EINZELBITS  SETZEN¬ 
LÖSCHEN 


sicher  auch  klar,  warum  wir  für  dieses 
IC  2  Adressleitungen  spendieren 
mußten. 

Der  8255  besitzt  intern  vier  Register 
(Speicherzellen),  in  denen  er  seine 
Betriebswerte  ablegt,  die  ihm  der 
Programmierer  mitteilt.  Welche 
Werte  das  sein  müssen,  erfahren  Sie 
in  einem  späteren  Abschnitt. 


Ohne  STEUERWORT 
geht  nichts! 

Da  man  mit  zwei  Leitungen  vier  logi¬ 
sche  Zustände  erzeugen  kann,  teilen 
wir  mit  diesen  beiden  Adressbus 
unserer  PIO  mit,  welcher  Port  ange¬ 
sprochen  werden  soll,  oder  ob  das 
Datenbyte  am  Datenbus  ein  Steuer¬ 
wort  repräsentiert  Tabelle  4  stellt 
Ihnen  die  Möglichkeiten  dar.  Daraus 
geht  hervor,  daß  die  beiden  Bits 
(AO+Al)  gleich  1  sein  müssen,  um 
das  Datenbyte  als  Steuerwort  zu 
kennzeichnen.  Das  Steuerwort,  wel¬ 
ches  die  Betriebsart  festlegt,  muß  nur 
einmal  beim  Initialisieren  festgelegt 
werden.  Es  bleibt,  wenn  es  nicht 


umprogrammiert  wird,  bis  zum  Aus¬ 
schalten  des  Gerätes  erhalten.  Die 
Adresse  für  das  Steuerwort  zur 
Programmierung  der  PIO  ist  in  unse¬ 
rem  Fall  &F8E3.  Kanal  A  wird  durch 
&F8E0,  Kanal  B  durch  &F8E1  und 
Kanal  C  durch  &F8E2  angewählt. 

In  der  Phase  der  erstmaligen  Pro¬ 
grammierung  des  8255  teilen  wir  ihm 
durch  ein  8-Bit-Datenwort  auf  den 
Leitungen  DO  -  D7  mit,  wie  er  sich  in 
Zukunft  verhalten  soll.  Das  heißt  im 
Klartext,  welchen  Port  er  in  welcher 
Betriebsart  betreiben  soll. 

Dabei  kann  er  innerhalb  dieser 
Möglichkeiten  noch  zwischen  drei 
Modi  wählen.  Der  einfachste  und  am 
meisten  verwendetete  Modus  ist  der 
Mode  0.  Hierbei  behandelt  der  8255 
seine  drei  Ports  abhängig  vom  Steuer¬ 
wort,  das  ihm  während  der  Initialisie¬ 
rung  angeboten  wird,  als  zwei  ge¬ 
trennt  steuerbare  Ein-/Ausgabeports 
(A/B).  Der  Port  C  wird  als  8-Bit-Port 
oder  als  getrennt  einstellbarer  2*4  Bit- 
Port  definiert.  Der  Port  C  kann  seine 
beiden  Hälften  unabhängig  als  Ein¬ 
oder  Ausgabeeinheiten  ansprechen. 
Bild  5  stellt  den  8255  im  Mode  0  als 
Blockschaltbild  dar.  Da  diese  Be¬ 


triebsart  die  universellste  ist,  werden 
wir  ausschließlich  diese  verwenden. 
Der  Vollständigkeit  halber  möchte 
ich  noch  auf  die  Charakteristik  der 
beiden  anderen  Modi  eingehen. 

Der  Modus  1  ist  in  erster  Linie  eine 
Betriebsart,  die  eine  einfache  Mög¬ 
lichkeit  darstellt,  eine  Schnittstelle 
mit  Handshake  (Händeschütteln) 
Signalen  aufzubauen.  Die  Erzeu¬ 
gung  und  Erkennung  diverser  Quit¬ 
tungssignale  erledigt  der  8255  von  al¬ 
lein.  Hier  ist  nur  ein  Betrieb  in  einer 
Richtung  möglich  (unidirektional). 
Der  Mode  2  stellt  eine  getaktete 
bidirektionale  Ein-/Ausgabeschnitt- 
stelle  zur  Verfügung.  In  dieser  Be¬ 
triebsart  kann  nur  der  Port  A  verwen¬ 
det  werden.  Die  notwendigen  Quit¬ 
tungssignale  werden  wieder  über  den 
Port  C  gesendet.  Wer  sich  noch  näher 
mit  diesem  interessanten  Baustein 
beschäftigen  möchte,  sei  auf  die  ent¬ 
sprechende  Fachliteratur  der  Firma 
INTEL  verwiesen. 

Nachdem  der  Rechner  den  Baustein 
mit  CS  aktiviert  hat,  das  erste  Daten¬ 
byte  (Steuerwort)  übernommen  wurde 
und  das  Signal  WR  aktiv  war,  ist  der 
8255  betriebsbereit.  Er  kann  aber  je¬ 
derzeit  nach  dem  gleichen  Verfahren 
umprogrammiert  werden.  Das  Steu¬ 
erwort  wurde  vom  Hersteller  folgen¬ 
dermaßen  definiert: 

Tabelle  5  stellt  die  verfügbaren  Ein¬ 
stellungen  des  Steuerwortes  in  der  für 
uns  interessanten  Betriebsart  0  dar. 
Die  Kombination  der  einzelnen  Bits 
läßt  16  Möglichkeiten  erkennen. 
Anhand  der  Tabelle  erkennen  Sie,  daß 
jedesmal  das  Bit  7  high  ist  (für  Be¬ 
triebsart  einstellen)  und  die  Bits  5  und 
6  gelöscht  sind  (für  Mode  0).  Die  ent¬ 
sprechenden  Portbedingungen  sind 
aus  den  anderen  Bitkombinationen 
abzulesen.  Wenn  die  Betriebsart 
programmiert  ist,  können  Sie  Werte 
an  die  einzelnen  Ports  ausgeben. 
Hierzu  müssen  Sie  die  entsprechende 
Ausgabeadresse  mit  einem  ”Out”- 
Befehl  und  dem  dazugehörigen  Wert 
spezifizieren.  Das  Ganze  können  Sie 
bequem  von  Basic  aus  machen.  Das 
folgende  kleine  Programm  hilft  Ihnen 
dabei. 

10  out  &F8E3,&88 
20  out  &F8E0,&FF 
30  out  &F8E1,&0F 
40  out  &F8E2,&0F 
50  print  inp(&F8e2) 

60  stop 

Bevor  wir  nun  zum  Aufbau  der  Platine 
kommen,  möchte  ich  noch  auf  einige 
Anschlüsse  des  8255  eingehen.  Der 
Reset-Pin  kann  über  eine  besondere 
Schaltung  aktiviert  werden  oder  über 
eine  Widerstand/Kondensator- Kom¬ 
bination  als  POWER  ON  RESET  be- 
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nutzt  werden.  Das  hört  sich  schlim¬ 
mer  an  als  es  ist  -  der  Baustein  muß 
nach  dem  Einschalten  der  Be¬ 
triebsspannung  in  einen  definierten 
Zustand  gebracht  werden  (alle  Pins 
auf  EINGABE),  um  nicht  eventuell 
angeschlossene  Geräte  zu  killen.  Bei 
der  Erzeugung  des  Resetsignals  ist 
darauf  zu  achten,  daß  es  ”active  high” 
ist.  Die  Anschlüsse  RD  und  WR 
sowie  alle  übrigen  Anschlüsse  sind 
mit  den  gleichen  Anschlüssen  des  Ex¬ 
pansionports  verbunden. 


Tips  zum  Platinenaufbau 


Die  IC’s  stecken  Sie  am  besten  in  eine 
Fassung,  sie  könnten  sonst  leicht 
beim  Einlöten  den  Hitzetod  sterben. 
Wenn  Sie  mit  dem  Bestücken  der 
Karte  fertig  sind,  machen  Sie  noch 
eine  Kontrolle  (Brücken  nicht  verges¬ 
sen,  IC’s  richtig  eingesteckt,  Kurz¬ 
schlüsse  etc.).  Ist  alles  in  Ordnung 
dann  stecken  Sie  Ihre  Karte  in  eine 
Steckerleiste  der  Basisplatine  ein. 
Wenn  Sie  Ihren  Computer  nun  ein¬ 
schalten  und  das  gewohnte  "READY” 


erscheint,  dann  können  Sie  jubeln;  es 
scheint  alles  zu  klappen. 


Anwendungen 


Der  8255  besitzt  an  seinen  drei  Ports 
Zwischenspeicher,  die  hervorragend 
dazu  geeignet  sind,  externe  Geräte 
anzusteuern.  Ich  möchte  Ihnen  an¬ 
hand  einiger  Beispiele  zeigen,  wie 
man  so  etwas  realisiert. 

Im  Bild  6a  sehen  Sie  Leuchtdioden, 
die  am  Port  A  über  einen  Strombe¬ 
grenzungswiderstand  angeschlossen 
sind.  Für  unsere  weiteren  Betrach¬ 
tungen  nehmen  wir  einmal  an,  daß 
der  8255  schon  initialisiert  sei.  Wir 
wollen  eine  angeschlossene  LED 
zum  Leuchten  bringen.  Dazu  muß  der 
zugehörige  Ausgang  high-Pegel  füh¬ 
ren.  An  diesem  Anschluß  muß  die 
Anode  der  LED  angeschlossen  wer¬ 
den.  Der  andere  Pin  befindet  sich 
über  dem  Widerstand  an  Masse. 
Nach  einem  ”OUT  &F8E0,255” 
leuchtet  diese  und  alle  anderen 
LED’s  am  Kanal  A  auf.  Nach  einem 
”OUT  &F8E0,0”  erlöschen  alle 


LED’s.  Selbstverständlich  gibt  es 
auch  billigere  Methoden,  acht  Lämp¬ 
chen  ein-  und  auszuschalten.  Unsere 
Schnittstelle  soll  schon  etwas  an¬ 
spruchsvollere  Aufgaben  überneh¬ 
men.  Die  Bilder  6b,  c  zeigen  Ihnen 
noch  einige  Möglichkeiten,  mit  dem 
8255  größere  Ströme  zu  schalten  bzw. 
Relais  anzusteuem.  Solche  Schaltun¬ 
gen  sind  sehr  vielseitig  einsetzbar. 
Aber  was  nützen  uns  die  schönsten 
Ausgabeschnittstellen,  wenn  der  Com¬ 
puter  nicht  erfahren  kann,  welche 
Reaktion  seine  Aktivität  an  Kanal  A 
bewirkt  hat.  Zu  dieser  Mitteilung  be¬ 
dienen  wir  uns  des  Kanals  C.  Hier 
kann  man  bestimmte  Meldungen,  sei 
es  von  einer  Taste,  einem  Kontakt 
oder  einfach  ein  logisches  Signal  von 
einem  Transistor,  einiesen  und  weiter 
auswerten.  Das  Bild  6c  zeigt  ein 
Anschlußbeispiel. 


Klein,  aber  OHO! 


Sie  haben  nun  einiges  Wissenswerte 
über  den  Schnittstellenbaustein  8255 
erfahren  können.  Jetzt  wollen  wir  der 
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eingebauten  Centronics  ein  Schnipp¬ 
chen  schlagen,  und  unsere  neuerwor¬ 
benen  Kenntnisse  in  die  Tat  umsetzen. 
Zuerst  überlegen  wir,  wie  eine  solche 
Schnittstelle  aussehen  muß.  Zunächst 
benötigt  man  acht  Datenleitungen. 
Die  Leitung,  die  dem  Computer  mit¬ 
teilt,  ob  das  Peripheriegerät  (Drucker) 
Daten  übernehmen  kann,  heißt 
BUSY.  Es  wird  über  einen  sogenann¬ 
ten  PULL-UP-Widerstand  an  die 
Leitung  7  des  Ports  C  angeschlossen. 
Ein  weiterer  Anschluß  ist  das  Signal 
STROBE.  Es  teilt  dem  Drucker  mit, 
daß  am  Datenbus  zu  dem  Zeitpunkt 
da  das  Strobe-Signal  low-Pegel  auf¬ 
weist,  gültige  Daten  zur  Abholung  be¬ 
reit  liegen.  Diese  zeitlichen  Zusam¬ 
menhänge  stellt  man,  wie  Sie  aus  der 
letzten  Folge  noch  wissen,  mittels 
sogenannten  Diagrammen  dar.  Aus 
diesen  Bedingungen  heraus  ent¬ 
wickelt  man  nun  das  entsprechende 
Programm.  Bild  7  stellt  die  Bedingun¬ 
gen  einer  Centronics  dar.  Dabei  ist  es 
unerheblich,  ob  nun  sieben  oder  acht 
Bit  übertragen  werden. 


DSR  -  Device  Service  Routine 


Eine  DSR  ist  ein  Treiberprogramm, 
das  dazu  verwendet  wird,  ein  Peri¬ 
pheriegerät  an  eine  vorhandene 
Hardware  anzupassen.  Aus  den 
Informationen,  die  uns  das  Zeit¬ 
diagramm  liefert,  können  wir  einen 
groben  Programmablauf  konstruie¬ 


Bild  8  Flußdiagramm  Centronics 


ren.  Dieses  Flußdiagramm  (Bild  8) 
stellt  die  Ablaufphasen  unseres  spä¬ 
teren  Maschinenprogramms  zur  An¬ 
steuerung  des  Druckers  dar. 

Um  den  Treiber  bequem  von  Basic 
bedienen  zu  können,  stellten  uns  die 
Entwickler  von  Amstrad  ein  lei¬ 
stungsfähiges  Werkzeug  bereit,  die 
RSX-Befehle.  Wie  man  sie  program¬ 
miert,  wurde  ausführlich  in  Heft  4/86 
beschrieben.  Deshalb  wollen  wir  uns 
damit  nicht  näher  beschäftigen,  wohl 
aber  mit  den  Befehlen  selbst.  Um  nun 
die  8-Bit- Schnittstelle  am  Schneider 
zu  betreiben,  ohne  jedesmal  umfang¬ 
reiche  Einstellungen  zu  machen,  bin¬ 
den  wir  mittels  eines  kleinen  Maschi¬ 
nenprogramms  das  Ganze  in  das  Be¬ 
triebssystem  ein.  Der  Schneider 
bildet  sich  dann  ein,  zwei  Centro- 
nicsports  zu  besitzen.  Das  kann  für 
uns  nur  von  Vorteil  sein,  denn  damit 
besteht  auch  die  Möglichkeit,  je  nach 
angeschlossenen  Karten  zwei  oder 
mehr  Drucker  am  Schneider  zu  be¬ 
treiben.  Die  einzelnen  Devices  müs¬ 
sen  nur  über  die  beiden  neuen  Be¬ 
fehle,  die  Ihr  Schneider  nun  versteht, 
umgeschaltet  werden. 

Diese  Maschinenroutine  wird  an  der 
Adresse  &9A00  abgelegt  und  mit 
XALL  &9A00”  aufgerufen.  ICEN- 
TON  schaltet  die  Schnittstelle  ein. 
Assemblerfreaks  unter  Ihnen  haben 
aus  dem  Assemblerlisting  sicher 
schon  die  verwendete  Methode  er¬ 
kannt  Die  Vektoren  (Zwischenstatio¬ 
nen  zu  den  Originalroutinen)  wer¬ 
den  einfach  umgebogen.  Man  schreibt 
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Listing  1:  .Basiclader 

10  REM  basiclader  centronicstreiber  5  BIT 
20  SEM  einbinden  mit  run”centorg. bas" 

30  REM  lader  loescht  sich  selbst 
40  REM  <c>  by  R.P  computing 
50  REM  Version  CPC  464 
60  REM 


190  DATA  &2B,  &BD,  &21 ,  &F2 ,  487 ,  422 ,  42C,  4BD,  4C9 ,  4C5, 
1307 

200  DATA  4CD , 455 , 49  A , 4C1 , 4C9 ,401, 432 , 400 , 4CD , 464 , 
1194 

210  DATA  49  A,  430,  414,  410,  4F9,  40D,  420,  4F6,  4B7, 4C9, 
1162 


70  REM  fuer  664  aendern  Zeile  190  Byte  4  +  5:  anst  220  DATA  4C5, 4D5, 45F,  401 , 4E2, 4F8, 4ED,  478, 417, 47B, 


att  4F2.487  :  40b, 488  ;chksum=107? 
80  REM 


90  REM  fuer  6128  aendern  Zeile  190  Byte  4+5:  ans 
tatt  4F2.487  :  41b, 488  ; chksum=1093 
100  REM 

110  REM  - 

120  DATA  401,  40D,  49A,  421,  409, 49A,  4C3,  4D1, 8rBC,  400, 
956 

130  DATA  400, 400, 400, 41B,  49A,  4C3, 42E,  49A,  4C3,  430, 
819 

140  DATA  49A,4C3,443,49A,4C3,44F,49A,449,44E,449, 
1222 

150  DATA  454,  4B3,  443,  445,  44E,  454,  44F,  4CE,  443,  445, 
982 

160  DATA  44E,  8*54,  44F,  446,  4C6,  400, 8t37,  4C9,  43E,  4C3, 
1022 

170  DATA  432, 42B, 4BD, 421, 44F, 49A, 422, 42C, 4BD, 43E, 
877 

180  DATA  488,  401 ,  4E3,  4F8,  4ED,  479,  4C9,  43E,  4CF,  432, 
1490 


1483 

230  DATA  4D1  ,  4C1 ,  4C9 ,  4C5 ,  401 , 4E0,  4F8,  4ED,  479,  401 , 
1632 

240  DATA  4E2 , 4F8 , 43E, 401 , 4F3 , 4ED, 479, 43E, 4FE, 4FB, 
1705 

250  DATA  4ED, 479, 4C1 , 437 , 4C9,  807 

260  dat=0: sz=0: dz=  10 

270  MEMORY  49A00-1 

280  FÜR  adr  =  49A00  TO  49A86 

290  READ  byte  :  dat=dat+l 

300  sz=sz+byte 

310  POKE  adr, byte 

320  IF  dat  <  10  AMD  adr  <  49A86  THEM  360 

330  READ  chksum 

340  IF  chksumOsz  THEM  PRIMT  "Fehler  in  zeile  :  ” ; 
dz+110: STOP 

350  dz=dz  +  10  :  sz=0:dat=0 
360  MEXT  adr 

370  CALL  49A00: CLS: PRIMT” Erweiterung  ist  eingebund 
en" : MEV 


Stückliste  Basisplatine: 

Bu  1  -  5:  64-pol.  VG-Federleiste 
Bu  6:  50-pol.  Buchse  für  Pfostenleiste 
CI:  Tantalelko  15uF  16V 
Dl:  1N4001 

an  die  entsprechenden  Speicherzel¬ 
len  einen  Verweis  auf  die  eigene 
Routine:  somit  wird  bei  jedem  Aufruf 
mit  PRINT  #8  die  neue  Routine 
ausgeführt  -  eine  sehr  elegante  Me¬ 
thode. 

ICENTOFF  schaltet  wieder  in  den 
normalen  Druckmodus  um.  Hier 
geht  man  den  umgekehrten  Weg  und 
schreibt  einfach  wieder  die  Original¬ 


werte  an  die  entprechenden  Speicher¬ 
zellen.  Spezialisten  unter  Ihnen,  die 
sich  mit  Assembler  auskennen,  fällt 
es  sicher  nicht  schwer,  das  Treiber¬ 
programm  auf  drei  oder  vier  nutzbare 
Druckerkanäle  mit  den  entsprechen¬ 
den  Platinen  zu  erweitern.  Wie  Sie  aus 
dem  Schaltbild  ersehen  können,  ist 


die  Adressdecodierung  so  universell 
ausgelegt,  daß  es  ohne  weiteres  mög¬ 
lich  ist,  mehrere  I/O-Karten  an  Ihrem 
Liebling  zu  betreiben.  Zum  Abschluß 
wünsche  ich  Ihnen  mit  der  ersten  Er¬ 
weiterung  viel  Freude  und  frohes 
DRUCKEN. 

(P.  Richter/ME) 


Stückliste  Centronicskarte: 

St  1:  64-pol.  VG  Messerleiste 

IC6:  7404 

Bu  1 : 36-pol.  Amphenolbuchse  90  Grad 

CI:  Elko  lOuF  16V 

IC1:  8255 

C2,3:  O.luF  - 

IC2:  74LS138 

C4  Tantalelko  4,7uF  16V 

IC3:  74LS32 

RI:  3,9  Kohm 

IC4,5:  74LS30 

R2:  xd  Kohm 

7 '86  CPC  67 


'neidet 


Hardware 


Disketten-Software 


Zubehör 


•  Diverse 
Drucker, 

•  Schneider-3'’-Leerdisketten  im 
2er  Pack  und  im  5er  Pack,  Hand¬ 
lich,  staubgeschützt  und  durch 
und  durch  sicher. 


Cassetten-Software 


Schneider 

rnmnt  itco  nnjicinN 
lui  irut  lK  uiisidiuii 


•  CPC  464,  der  Komplett-Com- 
puter,  ideal  für  Einsteiger  jeden 
Alters. 

Komplettpreis  für  Keyboard  mit 
integriertem  Datenrecorder  und 
Grün-Monitor 
DM  798,-*  (ÖS  6.490,-) 

CPC  464  mit  Farbmonitor 
DM  1.298,-*  (ÖS  9.990,-) 

•  CPC  6128,  die  128  K-Byte  Profi- 
Klasse,  für  den  privaten  und 
geschäftlichen  Einsatz. 
Komplettpreis  für  Keyboard  mit 
integriertem  3”-Diskettenlauf- 
werk,  einem  Software-Paket  auf 
2  Disketten  (CP/M  2.2,  CP/M  Plus, 
Dr.  LOGO,  GSX)**  und  Grün- 
Monitor 

DM  1.598,-  (ÖS  12.990,-) 

CPC  6128  mit  Farbmonitor 
DM  2.098,-*  (ÖS  16.990,-*) 

•  DMP  2000,  Dot  Matrix  Printer 
„Near  letter  Quality“.  Integrierter 
Formulartraktor,  105  Zeichen/sec. 

•  DDI-1,  FD-1,  Diskettenlaufwerke 
zur  Speicherung  größerer  Daten¬ 
mengen. 

•  RS  232  C  Schnittstelle,  die 
Verbindung  zur  „Umwelt“.  Zum 
Anschluß  an  Akkustikkoppler, 
Peripherie-Geräte  mit  serieller 
Schnittstelle  und  andere  Rechner. 

•  Terminal  Star,  Kommuni¬ 
kations-Software  bei  Einsatz  der 
Schnittstelle  RS  232  C. 

•  Netzteil  MP-2,  die  Stromversor¬ 
gung  zum  Anschluß  des  CPC  an 
ein  normales  Farbfernsehgerät. 

•  VCM-1,  die  Schnittstelle  zum 
Direktanschluß  an  alle  Schneider- 
Fernsehgeräte. 

•  Joystick  JY-2  für  Computer¬ 
spiele.  Allein  spielen  mit  dem 
Rechner  oder 
einem  Partner. 


Schneider  CPC-Station 


Der  kompakte,  ergonomisch  ge¬ 
staltete  Arbeitsplatz,  inkl.  Mehr¬ 
fachsteckdose. 

*  unverbindliche  Preisempfehlung 
**  eingetragene  Warenzeichen 
der  Digital  Research  Inc. 


Schicken  Sie  mir  ausführliche 
Informationen  über 


□  Schneider  Hardware 

□  Schneider  Zubehör 

□  Schneider  Cassetten-Software 

□  Schneider  Disketten-Software 

□  Schneider  Literatur 

Coupon  ausfüllen,  auf  eine  Postkarte 
kleben  (Absender  nicht  vergessen)  und 
am  besten  noch  heute  wegschicken  an 
Schneider  Computer  Division, 
Silvastraße  1 , 8939  Türkheim 


•  Spiele: 

Cyrus  Il-Schach. 

Sorcery  +. 

Super  Games  1, 4  Spiele:  Roland 
in  den  Höhlen,  Roland  in  der  Zeit, 
Hunchback,  Astro  Attack. 

Super  Games  II,  4  Spiele:  Roland 
am  Seil,  Roland  im  All,  Punchy, 
Harrier  Attack. 

Super  Games  III,  3  Spiele:  Flipper, 
Reversi,  Kniffei. 

Super-Sport  I,  2  Spiele:  Tennis, 
Pool  Billard. 

Super-Sport  II  (3D),  3  Spiele: 
Grand  Prix,  Stunt  Rider,  Boxkampf. 

•  Professionelle  Anwendungen: 
Schneider  „ComPack“,  das 
kommerzielle  Anwendungspaket 
für  kaufmännische  Verwaltungs¬ 
aufgaben  in  Kleinbetrieben. 
Schneider  „Tex  Pack“,  professio¬ 
nelle  Textverarbeitung  mit  Adreß- 
verwaltung,  abgestimmt  auf 
„ComPack“. 

•  Programmieren/Heim  und 
Beruf: 

Assembler/Disassembler,  Hisoft- 
Pascal,  Computerkurs. 


Schneider-Literatur 


Benutzerhandbuch  CPC  464, 
CPC  6128,  Basic-Handbuch, 
Firmware-Handbuch. 

Zahlreiche  Produkte  führender 
deutscher  Software-Häuser  und 
-Verlage  ergänzen  und  runden 
das  Schneider-Angebot  ab. 


•  Pädagogische  Programme: 
Happy  Numbers,  Timeman  One, 
Happy  Letters,  Wordhang, 
Computerkurs. 

•  Spiele: 

Elektro  Freddy,  Harrier  Attack, 
Alien  break  in,  Schatz  der 
Pharaonen,  Roland  in  den  Höh¬ 
len,  Roland  geht  graben,  Punchy, 
CUBIT,  Schach,  Golf,  Roland  in 
der  Zeit,  Flugsimulator,  Manie 
Miner,  Tennis,  Pool  Billard. 

•  Programmieren  -  Heim  und 
Beruf: 

Selbstlernbasic  1,  Selbstlern- 
basic  2,  Assembler/Disassembler, 
Hisoft-Pascal,  Textverarbeitung, 
Kalkulation,  Deutscher  Zeichen¬ 
satz. 


MH. III  ^0  p|  0  ml . . . . . . 

Das 

Software- 

Experiment 

Teil  1:  Komplexe  Grafik 

N icht  nur  in  der  Arbeitswelt  erzeugt  die 
moderne  Computertechnik  revolutio¬ 
näre  Veränderungen.  Auch  den  Wissen¬ 
schaftlern  und  Künstlern  stehen  in 
zunehmendem  Maße  Hilfsmittel  zur 
Verfügung,  deren  Möglichkeiten  sich 
heute  noch  gar  nicht  vollständig  ab¬ 
schätzen  lassen. 

So  ist  es  zum  Beispiel  mit  dem  Hoch¬ 
leistungs-Computer  CRAY  X-MP 
möglich  geworden,  die  Entstehungs¬ 
geschichte  unseres  Universums  zu 
rekonstruieren  und  auf  einem  Bild¬ 
schirm  grafisch  darzustellen.  Wer 
schon  einmal  mit  der  Differentialglei¬ 
chung  zu  tun  hatte,  die  die  Bewegung 
nur  eines  Planeten  um  die  Sonne  be¬ 
schreibt,  kann  ermessen,  welchen 
Rechenaufwand  ein  Projekt  erfordert, 
das  die  Wechselwirkungen  zwischen 
einer  wahrhaft  astronomischen  An¬ 
zahl  von  Himmelskörpern  berück¬ 
sichtigt. 

Der  Wissenschaftler  früherer  Zeiten, 
der  praktisch  nur  über  den  Rechen¬ 
schieber  und  die  Logarithmentafel  als 
Werkzeug  verfügte,  wäre  damit  hoff¬ 
nungslos  überfordert  gewesen.  Erst 
durch  die  Mikroelektronik  ist  es  mög¬ 
lich  geworden,  komplizierte  mathe¬ 
matische  oder  physikalische  Systeme 
durch  Simulationen  experimentell  zu 
erforschen.  Besonders  bemerkenswert 
ist  dabei,  daß  die  Ergebnisse  dieser 
Experimente  nicht  nur  in  abstrakter 
Form  als  Zahlen  oder  Gleichungen 
vorliegen,  sondern  teilweise  faszinie¬ 
rende  Bilder  ergeben. 

Wie  ein  Fernrohr  oder  ein  Mikroskop 
erlaubt  der  Computer  Einblicke  in 
Welten  und  Dimensionen,  die  dem 
menschlichen  Auge  sonst  verschlossen 
blieben.  Mathematisch-logische  Struk¬ 
turen  werden  sichtbar,  erscheinen  als 
Farben  und  Formen  auf  dem  Bild¬ 
schirm,  können  experimentell  und 
spielerisch  verändert  werden  -  kein 
Wunder  also,  daß  die  lange  Zeit  als 
trocken  verschrieene  Mathematik 
enorm  an  Attraktivität  gewonnen  hat. 
Nicht  nur  Künstler  entdecken  hier 
neue  Motive  und  Ausdrucksmöglich¬ 
keiten  -  auch  Jugendliche  entwickeln 
zunehmend  ein  lebhaftes  Interesse  an 
dieser  Wissenschaft,  die  erst  durch  das 
Medium  Computer  im  wahrsten  Sinne 
des  Wortes  anschaulich  geworden 
ist. 
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In  der  Serie  ”Das  Software-Experi¬ 
ment”  werden  wir  uns  mit  einigen  be¬ 
sonders  interessanten  Aspekten  dieser 
Entwicklung  beschäftigen  und  schwer¬ 
punktmäßig  die  Themen  experimen¬ 
telle  Mathematik,  Simulationen  und 
künstliche  Intelligenz  behandeln. 
Zwar  verfügt  der  CPC  nicht  über  die 
Kapazität  eines  CRAY-Rechners, 
doch  das  wird  uns  nicht  daran  hindern, 
mit  Hilfe  verschiedener  Programme 
einige  der  neuen  Möglichkeiten  aus¬ 
zuloten. 

Als  erstes  Software-Experiment  soll 
ein  Programm  vorgestellt  werden,  das 
mit  einer  relativ  einfachen  mathema¬ 
tischen  Formel  eine  Vielzahl  verblüf¬ 
fender  Bilder  erzeugt,  die  unter  dem 
Namen  ”Chaos-Grafik”  oder  ”Apfel- 
männchen”  bereits  für  einiges  Aufse¬ 


hen  gesorgt  haben.  Doch  wir  wollen  es 
nicht  dabei  belassen,  Programme  zu 
veröffentlichen  und  die  Bedienung  zu 
erklären  -  diese  Serie  soll  auch  Grund¬ 
lagen  vermitteln,  Hintergründe  erhel¬ 
len  und  Anregungen  für  eigene  Expe¬ 
rimente  geben. 

Die  ”Apfelmännchen-Grafiken”  ent¬ 
stehen  durch  die  bildliche  Darstellung 
der  Eigenschaften  komplexer  Zahlen¬ 
folgen  -  was  sind  überhaupt  komplexe 
Zahlen?  Wie  ist  es  möglich,  daß  eine 
mathematische  Formel  Strukturen  er¬ 
zeugt,  die  durch  ihre  "geordnete  Un¬ 
regelmäßigkeit”  fast  schon  organi¬ 
schen  Charakter  haben?  Um  der  Ant¬ 
wort  auf  diese  Fragen  näher  zu  kom¬ 
men,  beginnen  wir  mit  einem  kleinen 
Ausflug  in  die  Arithmetik,  die  Theorie 
der  Zahlen: 
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Herr  Ober,  bitte  Zahlen! 


Am  Anfang  der  Entwicklung  des 
Zahlbegriffes  standen  die  natürlichen 
Zahlen  1,  2,  3,...  "Natürlich”  wohl 
deshalb,  da  sie  nicht  aus  theorethi- 
schen  Überlegungen  entstanden,  son¬ 
dern  direkt  aus  der  Anschauung.  Der 
Urmensch  trat  aus  seiner  Höhle  und 
begann  zu  zählen:  ”1  Säbelzahntiger, 
2  Säbelzah ntiger ...”  -  nun,  wenn  auch 
vielleicht  nicht  genauso,  aber  so  ähn¬ 
lich  müssen  die  natürlichen  Zahlen 
entstanden  sein.  Und  für  viele  Zwecke 
reichen  sie  wirklich  aus!  Wir  können 
sie  addieren  oder  multiplizieren,  und 
das  Ergebnis  wird  wieder  eine  natür¬ 
liche  Zahl  sein.  Der  Bereich  der  natür¬ 
lichen  Zahlen  ist  also  hinsichtlich 
dieser  Operationen  abgeschlossen,  wie 
der  Mathematiker  sagt. 

Probleme  tauchen  jedoch  auf,  wenn 
wir  subtrahieren  oder  dividieren  wol¬ 
len.  Manchmal  geht  es  gut,  aber 
manchmal  auch  nicht,  wie  die  Glei¬ 
chung  x  4-  5  =  3  zeigt:  sie  hat  im  Be¬ 
reich  der  natürlichen  Zahlen  keine 
Lösung.  Ein  unbefriedigender  Zu¬ 
stand  -  und  so  erfanden  die  Menschen 
die  negativen  Zahlen,  um  sie  mitsamt 
der  Null  zur  Menge  der  ganzen  Zahlen 
zusammenzufassen,  oder  um  es  im 
Computerlatein  auszudrücken:  Die 
Integerzahl  war  geboren. 

Aber  gleichzeitig  hatte  der  Mensch 
damit  auch  den  Bereich  der  Anschau¬ 
ung  verlassen.  Die  negativen  Zahlen 
stellen  abstrakte  Gebilde  dar,  mit  de¬ 
nen  sich  zwar  gut  rechnen  läßt,  die 
aber  unser  Vorstellungsvermögen  be¬ 
reits  auf  eine  harte  Probe  stellen.  So 
gab  es  zum  Beispiel  während  meiner 
Studienzeit  einen  Mathematikdozen¬ 
ten,  der  wegen  seiner  miserablen  Vor¬ 
lesungen  sehr  unbeliebt  war.  Im  Laufe 
des  Semesters  schmolz  sein  Publikum 
zusehends  zusammen,  bis  eines  Tages 
nur  noch  kümmerliche  drei  Studen¬ 
ten  anwesend  waren  -  und  um  es  kurz 
zu  machen:  Die  Vorlesung  war  wieder 
dermaßen  unverständlich,  daß  insge¬ 
samt  fünf  von  ihnen  fluchtartig  den 
Raum  verließen.  "So”,  sagte  der  Prof 
mit  finsterer  Miene,  "wenn  jetzt  noch 
zwei  reinkommen,  dann  ist  keiner 
mehr  da!” 

Negative  Zahlen  sind  also  irgendwie 
doof,  wie  es  einer  meiner  Nachhilfe¬ 
schüler  einmal  kurz  und  bündig  zum 
Ausdruck  brachte,  aber  sie  sind  auch 
praktisch,  und  haben  sich  deshalb  bis 
heute  halten  können.  Das  gleiche  gilt 
sicherlich  auch  für  die  rationalen 
Zahlen,  die  Menge  der  Brüche,  mit 
deren  Hilfe  man  problemlos  fünf 
Kühe  auf  sieben  Bauernhöfe  verteilen 
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kann  -  theoretisch  zumindest  -,  aber 
leider  sind  damit  noch  längst  nicht  alle 
Probleme  beseitigt. 

Man  kann  nämlich  sehr  einfach  und 
schlüssig  nachweisen,  daß  sich  die 
algebraische  Gleichung 
x2  =  2 

nicht  durch  einen  Bruch  lösen  läßt. 
Angenommen,  es  wäre  so,  so  müßte 
sich  x  in  der  Form  p/q  darstellen  las¬ 
sen,  wobei  wir  jetzt  voraussetzen  wol¬ 
len,  daß  dieser  Bruch  bereits  so  weit 
wie  möglich  gekürzt  wurde,  p  und  q 
sind  damit  teilerfremd,  und  daran 
ändert  sich  auch  nichts,  wenn  wir  den 
Bruch  quadrieren.  Andererseits  erhal¬ 
ten  wir  nach  dem  Einsetzen  die  Aus¬ 
sage 

p2/q2  =  2 

Das  Ergebnis  kann  aber  nur  2  lauten, 
wenn  sich  der  Bruch  kürzen  läßt,  was 
im  Widerspruch  zu  unserer  Annahme 
steht,  sie  muß  deshalb  falsch  sein.  Also 
blieb  den  Mathematikern  nichts  an¬ 
deres  übrig,  als  für  diesen  und  ähn¬ 
liche  Fälle  neue  Zahlen  zu  erfinden, 
die  irrationalen  Zahlen.  Was  bedeutet 
aber  eigentlich  irrational? 

Nehmen  wir  also  ein  Fremdwörter¬ 
lexikon  zur  Hand,  und  dort  finden  wir 
wahrhaftig  "mit  dem  Verstände  nicht 
erfaßbar,  gefühlsbetont,  triebhaft”. 
Sie  merken  schon  -  jetzt  wird’s  gefähr¬ 
lich!  Zwar  habe  ich  persönlich  an  der 
Wurzel  aus  2  noch  keine  triebhaften 
Züge  entdeckt,  doch  den  Mathemati¬ 
kern  müssen  diese  Zahlen  irgendwie 
unheimlich  gewesen  sein,  denn  sie 
wurden  flugs  mit  den  rationalen  Zah¬ 
len  zur  Menge  der  reellen  Zahlen  ver¬ 
eint,  die  Sie  auf  dem  CPC  als  ”REAL- 
Typ”  wiederfinden.  "Reell”  heißt  so¬ 
viel  wie  "realisierbar,  einwandfrei,  an¬ 
ständig”,  Sitte  und  Ordnung  sind  also 
wieder  hergestellt  und  man  könnte 
sich  jetzt  in  Ruhe  anderen  Di  ngen  zu¬ 
wenden,  wenn  es  da  nicht  noch  ein 
kleines  Problem  gäbe: 

x2  =  -1 

Das  ist  wirklich  eine  harte  Nuß:  Wel¬ 
che  Zahl  ergibt  mit  sich  selbst  multi¬ 
pliziert  -1?  Mit  den  reellen  Zahlen 
kommt  man  keinen  Schritt  weiter,  und 
auch  unser  schlauer  CPC  ist  hier  über¬ 
fordert: 

PRINT  SQR(-l) 

entlockt  ihm  nur  ein  ratloses  ’Tmpro- 
per  Argument”.  Doch  an  dieser  nahezu 
unüberwindlichen  Schwelle  wagten 
die  Mathematiker  einen  mutigen 
Schritt.  "Gut”,  sagten  sie  sich,  ”wir 
kennen  die  Lösung  nicht,  aber  wir 
wollen  einfach  mal  annehmen,  daß 
eine  existiert”,  und  nannten  diese  ge¬ 
heimnisvolle  Zahl  ”i”,  für  die  defini¬ 
tionsgemäß  gilt 

i*i  -  -1 

Der  Buchstabe  i  steht  für  "imaginär” 


(scheinbar,  unwirklich),  ein  treffender 
Name  für  eine  absolut  abstrakte  Zahl, 
die  keine  Entsprechung  mehr  in  der 
Wirklichkeit  hat 

Doch  wie  Versuche  zeigen,  kann  man 
mit  der  imaginären  Zahl  alle  gewohn¬ 
ten  Rechenoperationen  durchführen, 
ohne  das  es  zu  Widersprüchen  kommt; 
die  Erweiterung  des  Zahlbegriffs  ist 
damit  zumindest  formal  in  Ordnung. 
Insbesondere  ist  es  möglich,  die  Zahl 
i  durch  Addition  oder  Multiplikation 
mit  reellen  Zahlen  zu  verknüpfen, 
wodurch  Gebilde  wie  etwa  3+2*i  ent¬ 
stehen,  oder  in  allgemeiner  Form 
c=x+y*i 

Solche  Zahlen  c,  die  aus  einer  reellen 
Zahl  und  einem  Vielfachen  der  ima¬ 
ginären  Grundeinheit  zusammenge¬ 
setzt  sind,  nennt  man  komplexe  Zah¬ 
len.  Dem  berühmten  Mathematiker 
Gauß  ist  der  Nachweis  zu  verdanken, 
daß  damit  unser  Zahlensystem  end¬ 
gültig  abgeschlossen  ist,  jede  algebra¬ 
ische  Gleichung  hat  also  zumindest 
eine  komplexe  Lösung.  Es  fragt  sich 
nur,  warum  man  sich  überhaupt  mit 
solchen  Hirngespinsten  beschäftigen 
soll,  die  auf  den  ersten  Blick  nicht  den 
geringsten  praktischen  Wert  haben. 
Doch  ähnlich  wie  die  negativen  Zah¬ 
len  stellen  die  komplexen  Zahlen  trotz 
ihrer  Unanschaulichkeit  für  manche 
physikalischen  oder  mathematischen 
Problemstellungen  ein  sehr  effektives 
Werkzeug  dar.  So  lassen  sich  zum  Bei¬ 
spiel  einige  Differentialgleichungen 
wesentlich  einfacher  lösen,  wenn  man 
von  vornherein  bestimmte  Variablen 
als  komplexe  Zahlen  betrachtet.  Nicht 
umsonst  stellen  höhere  Programmier¬ 
sprachen  für  wissenschaftliche  An¬ 
wendungen  (z.B.  FORTRAN)  neben 
INTEGER  und  REAL  auch  den  Va¬ 
riablentyp  COMPLEX  zur  Verfü¬ 
gung. 

Obwohl  das  Schneider-Basic  keine 
Anweisung  wie  DEFCOMPLEX 
kennt,  kann  man  jedoch  auch  mit 
dem  CPC  in  die  Gefilde  der  höheren 
Mathematik  Vordringen.  Jede  kom¬ 
plexe  Zahl  c=x+y*i  läßt  sich  nämlich 
durch  ein  ganz  normales  Zahlenpaar 
darstellen,  wobei  die  eine  den  Realteil 
und  die  andere  den  Imaginärteil  re¬ 
präsentiert: 

Re(c)  =  x,  Im(c)  =  y 
Indem  wir  den  Rechner  die  Kompo¬ 
nenten  separat  bearbeiten  lassen,  er¬ 
sparen  wir  ihm  die  ominöse  Wurzel 
aus  -1,  die  ja  sofort  einen  Error  auslö- 
sen  würde. 

Solch  ein  Zahlenpaar  läßt  sich  natür¬ 
lich  hervorragend  in  einem  Koordi¬ 
natensystem  darstellen,  wobei  die  x- 
Achse  der  reellen  Zahlengeraden  und 
die  y-Achse  der  imaginären  Geraden 
entspricht.  Zeichnet  man  vom  Ur- 
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sprung  des  Koordinatensystems  einen 
Pfeil  bis  zu  dem  Punkt,  der  die  kom¬ 
plexe  Zahl  repräsentiert,  so  kann  man 
sich  noch  veranschaulichen,  was  man 
unter  dem  Absolutbetrag  dieser  Zahl 
versteht:  Er  ist  identisch  mit  der  Länge 
des  Pfeils,  die  mit  dem  Satz  des  Py¬ 
thagoras  berechnet  wird: 

L2  =  X2  +  Y2 

Auf  diese  Weise  ist  es  sogar  möglich, 
komplexen  Zahlen  eine  Art  Größe  zu¬ 
zuordnen,  die  für  die  Apfelmänn¬ 
chen-Grafik  noch  eine  wichtige  Rolle 
spielen  wird. 


Abb.  Koordinatenkreuz 


Chaos  im  Computer 


Ordnung  ist  das  halbe  Leben,  so  sagt 
ein  Sprichwort  -  und  Unordnung  die 
andere  Hälfte,  ergänzt  der  erfahrene 
Programmierer,  der  nach  intensiver 
Suche  die  Systemdiskette  zwischen  ein 
paar  alten  Listings  im  Papierkorb 
wiederfindet.  Doch  Schreck  beiseite: 
Heutzutage  macht  sich  in  den  Natur¬ 
wissenschaften  mehr  und  mehr  die 
Überzeugung  breit,  daß  hochkompli¬ 
zierte  Strukturen  wie  lebende  Orga¬ 
nismen  nur  durch  das  Zusammen¬ 
spiel  von  Ordnung  und  Chaos,  von 
Gesetz  und  Zufall  entstehen  konnten. 
Und  diese  Theorie  wird  insbesondere 
durch  die  Ergebnisse  einiger  Compu¬ 
tersimulationen  gestützt! 

Die  exakten  Naturgesetze  geben  der 
Welt  einen  festen  Rahmen.  Sind  alle 
Anfangsbedingungen  eines  Systems 
bekannt,  so  kann  man  mit  ihrer  Hilfe 
zumindest  theoretisch  in  allen  Einzel¬ 
heiten  berechnen,  was  passieren  wird. 
Doch  die  moderne  Physik  hat  nach¬ 
gewiesen,  daß  im  Bereich  der  Elemen¬ 
tarteilchen  Abläufe  stattfinden,  die 
unbestimmt  sind,  und  über  die  höch¬ 
stens  statistische  Aussagen  gemacht 
werden  können.  Unsere  Welt  besitzt 
also  einen  eingebauten  Zufallsgene¬ 
rator,  der  zuverlässig  verhindert,  daß 
sie  in  gleichbleibenden  Mustern  sta¬ 
gniert 
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Jeder  Spiele-Programmierer  weiß  die 
RND-Funktion  seines  Computers  zu 
schätzen,  den  vorprogrammierten 
Unbestimmtheitsfaktor,  der  für  Ab¬ 
wechslung  und  Spannung  sorgt.  Bei 
Bedarf  produziert  er  eine  Folge  von 
Zahlen,  denen  beim  besten  Willen 
kein  System  mehr  anzusehen  ist  -  und 
trotzdem  handelt  es  sich  nicht  um 
echten  Zufall,  sondern  nur  um  eine 
sehr  gute  Simulation!  Natürlich  kann 
ein  Computer  sich  nicht  intuitiv  Zah¬ 
len  ausdenken,  sondern  muß  sie  auf 
irgendeine  Weise  berechnen.  Eine 
Folge  von  Pseudo-Zufallszahlen  wird 
im  allgemeinen  iterativ  erzeugt,  d.h. 
jede  Zahl  entsteht  aus  der  vorherigen 
durch  ein  bestimmtes  Bildungsgesetz, 
das  allerdings  vom  Betrachter  kaum 
nachzuvollziehen  ist  -  es  sei  denn,  er 
schaut  sich  im  ROM-Listing  um. 
Eine  einfache  Rechenoperation  wie 
das  Quadrieren  der  Zahl  reicht  hier 
natürlich  nicht,  das  Bildungsgesetz 
wäre  noch  zu  offensichtlich.  Wesent¬ 
lich  mehr  "künstliches  Chaos”  ent¬ 
steht  schon,  wenn  man  zusätzlich  noch 
die  erste  Zahl  der  Folge  als  konstanten 
Wert  subtrahiert,  wie  das  folgende 
Kurzprogramm  zeigt: 

10  xstart=T.5:x=xstart 
20  x— x*x-xstart:PRINT  x 
30  GOTO  20 

Obwohl  die  recht  strengen  Kriterien 
für  "professionelle”  Zufallsgenerato¬ 
ren  durch  dieses  einfache  System  noch 
nicht  erfüllt  sind,  ist  das  Ergebnis 
schon  recht  beachtlich,  und  es  wird 
noch  interessanter,  wenn  wir  die  glei¬ 
che  Iterationsvorschrift  auf  komplexe 
Zahlen  anwenden. 

Um  das  Gesetz  noch  einmal  exakt  zu 
formulieren:  Wenn  die  komplexe 
Zahl  C  der  Startwert  ist, 

Ct  =  C 

dann  berechnen  wir  alle  weiteren 
Zahlen  nach  der  Vorschrift 

Cn+i  —  cn2  -  c 

So  einfach  sich  dieses  System  auch 
darstellen  läßt  -  in  der  Praxis  bedeutet 
es  einige  Rechnerei.  Das  Quadrat  ei¬ 
ner  komplexen  Zahl  muß  mit  Hilfe  der 
binomischen  Formel  ermittelt  wer¬ 
den: 

c2  =  (x  -f  yi)2 

=  x2  +  2xyi  4-  y2i2 

Da  i*i  —  -1  ergibt,  können  wir  noch 
vereinfachen, 
c2  =  x2  +  2xyi  -  y2 
und  dann  Real-  und  Imaginärteil  tren¬ 
nen, 

Re(c2)  =  x2  -  y2 
Im(c2)  =  2xy 

womit  deutlich  wird,  daß  diese  Ope¬ 
ration  insgesamt  eine  Subtraktion  und 
vier  Multiplikationen  erfordert.  Das 
Subtrahieren  zweier  komplexer  Zah¬ 
len  ist  glücklicherweise  etwas  weniger 


aufwendig;  hier  werden  einfach  die 
Real-  und  Imaginärkomponenten  der 
beiden  Zahlen  separat  voneinander 
abgezogen. 

Um  zu  verstehen,  wie  diese  Rechen¬ 
operationen  das  Apfelmännchen  und 
Konsorten  erzeugen,  sollten  Sie  sich 
zunächst  das  Programm  "Komplexe 
Folgen”  vornehmen.  Nach  dem  Pro¬ 
grammstart  erscheint  auf  dem  Bild¬ 
schirm  ein  Koordinatenkreuz,  das 
durch  die  reale  und  imaginäre  Achse 
der  Zahlenebene  gebildet  wird.  Zu¬ 
sätzlich  ist  ein  Kreis  und  ein  kleiner 
heller  Punkt  zu  sehen,  der  mit  den 
Cursortasten  gesteuert  wird  und  den 
Startwert  repräsentiert.  Oben  links 
werden  Real-  und  Imaginärteil  des 
augenblicklichen  Standortes  ange¬ 
zeigt 

Wenn  Sie  nun  mehrmals  die  Leertaste 
drücken,  berechnet  das  Programm 
nach  deroben  angegebenen  Methode 
die  jeweils  nächste  Zahl  der  Folge  und 
zieht  eine  Linie  zur  neuen  Position.  Je 
nach  Startwert  ergibt  sich  ein  wilder 
Zickzack-Kurs,  der  allerdings  beendet 
wird,  wenn  das  Abbruch kriterium 
x2  -f  y2  >=  8 

erfüllt  ist  also  eine  Zahl  der  kom¬ 
plexen  Folge  außerhalb  des  Kreises 
mit  dem  Radius  SQR(8)  liegt.  Mit  DEL 
können  Sie  das  Programm  neu  starten 
und  einen  anderen  Anfangswert  pro¬ 
bieren. 

Die  Ergebnisse  dieser  Experimente 
können  sehr  verschieden  ausfallen. 
Einige  Folgen  verlassen  schon  nach 
wenigen  Iterationen  den  Kreis,  andere 
erst  nach  vielem  Hin  und  Her  (pro¬ 
bieren  Sie  0.24/— 0.64!),  und  manche, 
deren  Anfangswert  nahe  genug  bei  0 
liegt,  rennen  sich  fest  und  erreichen 
nie  das  Abbruchkriterium. 

Alles  in  allem  zeigen  die  komplexen 
Folgen  also  ein  recht  chaotisches  Ver¬ 
halten,  und  genau  das  wollten  wir  ja 
auch  erreichen.  Doch  jetzt  der  Ülou: 
Eines  Tages  kam  der  Mathematiker 
Benoit  Mandelbrot  im  IBM  Research- 
Center  New  York  auf  die  geniale  Idee, 
die  Punkte  der  komplexen  Zahlenebe¬ 
ne  einzufärben,  und  zwar  in  Abhän¬ 
gigkeit  von  der  Iterationstiefe  bis  zum 
Abbruch  -  und  er  staunte  nicht 
schlecht,  als  er  das  Ergebnis  sah:  Das 
erste  Apfelmännchen  war  geboren! 
Die  feinen  Strukturen  am  inneren 
Rand  der  Figur  hielt  er  übrigens  zu¬ 
nächst  für  Unschärfen,  erzeugt  durch 
Rundungsfehler.  Erst  die  Berechnung 
vergrößerter  Ausschnitte  förderte  die 
erstaunliche  Tatsache  zu  Tage,  daß 
diese  Grafik  eine  unendliche  Anzahl 
von  kunstvollen  Unterstrukturen  ent¬ 
hält.  Bemerkenswert  ist  weiterhin,  daß 
sich  die  Grundmuster  in  verkleinerter 
Form  an  verschiedenen  Stellen  der 
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Grafik  wiederholen.  Der  große  Zu¬ 
sammenhang  spiegelt  sich  im  Kleinen 
wieder  -  ein  wichtiger  Grundgedanke 
der  Esoterik  und  anderer  ganzheitlich 
orientierter  Philosophien,  der  in  die¬ 
sen  Bildern  auf  verblüffende  Weise 
seinen  Ausdruck  findet. 


Kommt  Zeit,  kommt  Grafik 


Wie  wird  die  komplexe  Grafik  nun  auf 
dem  CPC  realisiert?  Gehen  wir  von 
den  technischen  Voraussetzungen  aus: 
Der  Grafikbildschirm  stellt  ebenfalls 
ein  Koordinatensystem  dar,  das  in 
MODE  1  ingesamt  320*200  Bildpunk¬ 
te  enthält  Wenn  wir  einen  Bereich  der 
komplexen  Zahlenebene  auswählen 
und  auf  den  Bildschirm  projizieren, 
entspricht  jeder  Punkt  einer  Zahl.  Für 
ein  komplettes  Bild  müssen  also  64000 
Folgen  berechnet  werden,  für  jede 
Folge  abhängig  von  der  Iterationstiefe 
einige  -zig  komplexe  Zahlen,  und  das 
auch  noch  in  der  zeitaufwendigen 
Fließkomma-Arithmetik.  Es  bst  also 
leicht  einzusehen,  daß  der  Zeitauf¬ 
wand  für  ein  Bild  mehrere  Stunden 
betragen  kann.  Abhilfe  würde  hier  nur 
eine  verbesserte  Hardware  schaffen, 
z.B.  ein  schneller  Arithmetik-Kopro¬ 
zessor. 

Insgesamt  stehen  in  MODE  1  vier  Far¬ 
ben  zur  Verfügung.  Wenn  das  Pro¬ 
gramm  die  Rechentiefe  bis  zum  Ab¬ 
bruch  der  Folge  ermittelt  hat,  wird  der 
Punkt  nach  folgender  Formel  einge¬ 
färbt: 

färbe  =  tiefe  MOD  4 

Wie  wir  gesehen  haben,  gibt  es  aller¬ 
dings  auch  Folgen,  die  nie  das  Ab¬ 
bruchkriterium  erreichen.  Deshalb 
wird  von  vornherein  eine  maximale 
Tiefe  als  feste  Grenze  festgelegt,  damit 
sich  das  Programm  nicht  in  einer 
Endlosschleife  verfängt. 

Die  Berechnungsroutine  für  das  Pro¬ 
gramm  "komplexe  Grafik”  wurde  in 


Maschinensprache  geschrieben,  um 
eine  möglichst  hohe  Geschwindigkeit 
zu  erreichen.  Da  man  in  den  DATA- 
Zeilen  den  Algorithmus  kaum  wieder¬ 
erkennen  kann,  ist  noch  ein  kleines 
Basic-Listing  beigefügt,  das  bis  aut 
leichte  Modifikationen  bei  der  Farb¬ 
gebung  dem  Maschinenprogramm 
entspricht.  Für  den  praktischen  Ein¬ 
satz  wäre  es  allerdings  viel  zu  lang¬ 
sam. 

Und  jetzt  zur  Bedienung:  Nach  dem 
Programmstart  erscheint  auf  dem  Bild¬ 
schirm  ein  kleines  Menuefenster.  Es 
handelt  sich  um  ein  echtes  "Pull 
Down-Menue”,  das  man  jederzeit  mit 
Hilfe  der  ENTER-Taste  aufrufen  oder 
verschwinden  lassen  kann,  ohne  daß 
die  Grafik  zerstört  wird.  Die  einzelnen 
Menuepunkte  werden  mit  Hilfe  eines 
Pointers  angewählt,  der  mit  den  Cur¬ 
sortasten  <oben>  und  <unten>  be¬ 
wegt  wird.  Die  COPY-Taste  aktiviert 
die  Funktion,  auf  die  der  Pointer  zeigt 
Um  das  "Apfelmännchen”  als  Grund¬ 
lage  für  weitere  Bilder  zu  erzeugen, 
wählen  Sie  am  besten  direkt  den 
Punkt  "Zeichnen”  an.  Danach  will  das 
Programm  noch  die  maximale  Itera¬ 
tionstiefe  wissen;  geben  Sie  hier  den 
Wert  30  ein  und  drücken  ENTER  Der 
CPC  wird  sich  daraufhin  etwa  eine 
Stunde  lang  mit  dem  Bild  beschäfti¬ 
gen.  Wenn  er  fertig  ist,  erscheint  wie¬ 
der  das  Menuefenster,  und  Sie  können 
mit  der  Funktion  ”Speichern”  die 
Grafik  nach  Eingabe  eines  Datei¬ 
namens  auf  Kassette  oder  Diskette 
sichern.  An  den  Namen  hängt  das 
Programm  noch  die  Erweiterung  "PICT 
(Picture)  an,  um  das  Binärfile  als  Bild¬ 
datei  zu  markieren.  Auch  beim  Laden 
wird  diese  Kennzeichnung  nicht  mit 
eingegeben!  Bei  Diskettenbetrieb  soll¬ 
te  man  sich  unbedingt  davon  über¬ 
zeugen,  daß  der  Name  korrekt  ist  und 
sich  wirklich  eine  Diskette  im  Lauf¬ 
werk  befindet,  da  sonst  das  Bild  durch 
die  Fehlermeldung  zerstört  wird.  Wer 
will,  kann  noch  zur  Sicherheit  die  in 
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stellte  Fehlerabfangroutine  an  geeig¬ 
neter  Stelle  einfügen. 

Beim  Speichern  werden  übrigens  alle 
wichtigen  Bilddaten  (Farben,  Koordi¬ 
naten,  Tiefe)  mit  aufgezeichnet.  Ein 
Trick  erspart  hier  zusätzliche  Para¬ 
meterdateien:  Die  Werte  stehen  näm¬ 
lich  in  einem  nicht  sichtbaren  Bereich 
des  Bildschirmspeichers!  Nach  dem 
Laden  werden  sie  dann  wieder  gelesen 
und  korrekt  eingestellt  Dadurch  ist  es 
sogar  möglich,  ein  unvollständiges 
Bild  abzuspeichem  und  bei  Gelegen¬ 
heit  weiterzeichnen  zu  lassen.  Der 
Abbruch  erfolgt  mit  ENTER,  der  CPC 
reagiert  allerdings  erst,  wenn  er  mit  der 
aktuellen  Rasterzeile  fertig  ist,  was 
mitunter  etwas  dauern  kann.  Eine 
unvollständige  Grafik  im  Speicher 
wird  vom  Programm  automatisch  er¬ 
kannt;  nach  Anwahl  von  "Zeichnen” 
setzt  es  sein  Werk  fort,  ohne  vorher 
dumme  Fragen  zu  stellen. 

Der  Menuepunkt  "Farben”  ermög¬ 
licht  es,  mit  Hilfe  der  Cursortasten 
<oben>  und  <unten>  die  vier  Farb¬ 
stifte  (PEN)  anzusteuern  und  dann 
mit  denTasten  <links>  bzw.  <rechts> 
die  dazugehörige  Farbe  (INK)  zu  än¬ 
dern.  Angezeigt  wird  dabei  laufend  die 
Nummer  der  Farbe  -  siehe  CPC-An- 
leitungsbuch.  Mit  ENTER  kommen 
Sie  zurück  ins  Hauptmenue. 

Die  Funktion  "Ausschnitt”  bietet  die 
Möglichkeit,  einen  bestimmten  Be¬ 
reich  der  komplexen  Zahlenebene 
herauszugreifen,  um  ihn  entsprechend 
vergrößert  zeichnen  zu  lassen.  Wenn 
sich  bereits  ein  Bild  im  Speicher  befin¬ 
det,  so  wird  ein  Rechteck  auf  dem  Bild¬ 
schirm  erscheinen,  das  Sie  mit  den 
Cursortasten  herumwandem  lassen 
können.  Für  die  Feinabstimmung  sind 
die  Cursortasten  plus  SHIFT  bzw. 
CTRL  zuständig;  auf  diese  Weise  wird 
die  obere  linke  bzw.  untere  rechte  Ecke 
des  Ausschnitts  pixelweise  verscho¬ 
ben. 

Auch  die  Form  und  Größe  des  Recht- 
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ecks  kann  damit  beliebig  verändert 
werden,  es  empfiehlt  sich  jedoch,  ein 
Seitenverhältnis  zu  wählen,  das  un¬ 
gefähr  dem  Bildschirmformat  ent¬ 
spricht,  damit  beim  Zeichnen  nicht  zu 
starke  Verzerrungen  entstehen.  Wer 
sich  für  die  Koordinaten  des  Aus¬ 
schnitts  interessiert,  kann  die  Werte 
einfach  mit  COPY  abrufen;  eine  belie¬ 
bige  Taste  läßt  sie  wieder  vom  Bild¬ 
schirm  verschwinden.  Mit  ENTER 
wird  die  Wahl  des  Ausschnitts  abge¬ 
schlossen,  und  das  Menue  erscheint. 
Wenn  Sie  den  Punkt  "Ausschnitt” 
anwählen,  ohne  daß  sich  ein  Bild  im 
Speicher  befindet,  ergibt  das  Rechteck 
natürlich  keinen  Sinn.  Das  Programm 
erwartet  in  diesem  Fall  von  Ihnen,  daß 
Sie  den  Bereich  durch  die  Eingabe  von 
vier  Zahlen  bestimmen: 

-  linker  Rand 

-  rechter  Rand 

-  oberer  Rand 

-  unterer  Rand 

ENTER  ohne  eine  Eingabe  führt  auch 
hier  zurück  ins  Hauptmenu e. 

Der  Programmteil  "Zeichnen”  er¬ 
zeugt  immer  den  zuletzt  eingestellten 
Ausschnitt.  Wenn  Sie  nach  dem  Pro¬ 
grammstart  keinen  Bereich  vorgeben, 
wird,  wie  bereits  erwähnt,  automatisch 
das  ”Apfelmännchen”  mit  folgenden 
Koordinaten  gemalt: 
links  -0.7 
rechts  2.1 
oben  1 
unten  -1 

Wenn  das  Programm  ein  neues  Bild 
zeichnet,  so  wird  das  alte  Bild  einfach 


überschrieben.  Es  bleibt  also  noch 
auf  dem  Bildschirm,  es  sei  denn,  sie 
wählen  zunächst  den  Punkt  "Löschen”. 
Diese  Funktion  löscht  das  Bild,  nicht 
aber  einen  vorher  eingestellten  Aus¬ 
schnitt! 

Für  das  nächste  Bild  sucht  man  sich 
natürlich  am  besten  einen  Bereich 
aus,  der  schon  von  vornherein  eine 
interessante  Struktur  erkennen  läßt. 
Von  den  Vergrößerungen  kann  man 
natürlich  weitere  Ausschnitte  zeich¬ 
nen  lassen  und  auf  diese  Weise 
immer  weiter  in  Bilddetails  Vordrin¬ 
gen  -  soweit  die  Rechengenauigkeit 
des  CPC  reicht. 

Insbesondere  der  innere  Rand  des 
Apfelmännchens  gibt  allerhand  her. 
Wenn  Sie  nach  Wahl  des  Menue- 
punktes  "Zeichnen”  eine  größere  Re¬ 
chentiefe  vorgeben  (maximal  255), 
kommen  noch  weitere  Formen  zum 
Vorschein:  Je  größer  die  Tiefe,  um  so 
mehr  Strukturen  kann  das  Programm 
noch  erfassen.  Allerdings  steigt  damit 
auch  die  Rechenzeit  für  ein  komplet¬ 
tes  Bild  enorm  an  und  kann  sich  bis 
auf  mehrere  Stunden  ausdehnen. 
Etwas  Geduld  braucht  man  also 
schon  für  dieses  Abenteuer  im  Land 
der  komplexen  Zahlen! 


Hast  du  Töne? 


Vom  Funktionenplotter  bis  zur  kom¬ 
plexen  Grafik  reicht  die  Palette  der 
Programme,  die  auf  Heimcomputem 
mathematische  Strukturen  sichtbar, 


oder  noch  besser  gesagt,  anschaulich 
machen.  Doch  sollte  es  nicht  möglich 
sein,  sie  auch  hörbar  zu  machen,  d.h. 
aus  Formeln  interessante  Klänge 
oder  Tonfolgen  zu  erzeugen? 

Der  CPC  verfügt  über  einen  Sound¬ 
chip,  der  für  solche  Experimente  im 
Prinzip  gut  geeignet  ist.  Doch  bisher 
liegt  in  dieser  Richtung  kaum  Ma¬ 
terial  vor.  Deshalb  ein  Aufruf  und 
eine  Bitte  an  unsere  Leser:  Wenn  Sie 
zu  diesem  Thema  eine  Idee  haben 
oder  ein  Programm  schreiben  wollen, 
schicken  Sie  uns  das  Ergebnis  zu! 
Wohlgemerkt  -  wir  erwarten  keine 
Super-Synthesizer-Program  me;  wert¬ 
voll  sind  auch  schon  interessante  An¬ 
sätze,  die  dann  vielleicht  im  Rahmen 
eines  Leserprojekts  weiterentwickelt 
werden  können.  Legen  Sie  bitte  nur 
eine  Beschreibung  des  Algorithmus 
bei  und  schildern  Sie  mit  ein  paar 
Worten,  wie  die  Idee  entstanden  ist. 
Längere  Beiträge  und  Programme 
werden  natürlich  bei  Abdruck  wie 
üblich  honoriert. 

Bei  entsprechender  Resonanz  wer¬ 
den  wir  demnächst  eine  Folge  dieser 
Serie  dem  Thema  "mathematische 
Klänge”  widmen  -  doch  ob  es  dazu 
kommt,  hängt  auch  von  Ihnen  ab  ! 

Berechnungsroutine  in  Basic: 

Übergabeparameter:  xl  = 

linker  Rand  des  Ausschnitts 

xr  =  rechter  Rand 

yo  =  oberer  Rand 

yu  =  unterer  Rand 

tm  =  maximale  Iterationstiefe 

(Matthias  Uphoff) 


10 

[2726] 

20 

1  *  Darstellung  in  der  Zahlenebene  • 

[2674] 

30 

1 

[117] 

40  MODE  1 

[506  ] 

50  ORIGIN  320 , 200 :DEG 

[478] 

60  : 

<=50:y=50 

[1154] 

70  INK  0,0: INK  1,6: INK  2,26: INK  3,14 

[921  1 

80  t$="  " 

[527] 

90  FOR  i=240  TO  243 

[972] 

100 

t$=t$+CHR$ ( i ) 

[1183] 

110 

NEXT 

[350] 

120 

'***•  Komplexe  Zahlenebene  zeichnen 

£15131 

130 

CLS:GOSUB  440 :GOSUB  450 

[1437] 

140 

PRINT  CHR$ ( 23 ) ; CHR$ ( 0 ) 

[1984] 

150 

MOVE  -320 ,0 :DRAW  320,0,1 

[19281 

160 

MOVE  0 , -200 :DRAW  0,200 

[946] 

170 

FOR  i=-30 0  TO  300  STEP  50 

I15B2] 

180 

MOVE  i, 0 : DRAW  i,6 

[556  ] 

190 

NEXT 

[350] 

200 

FOR  i=-200  TO  200  STEP  50 

[1093  ] 

210 

MOVE  0 , i ; DRAW  6,i 

[1115] 

220 

NEXT 

[3501 

230 

TAG 

[318] 

240 

MOVE  6,194: PRINT"Im" ; 

[1050] 

250 

MOVE  280,22:  PRINT"Re'' ; 

[1818  ] 

260 

TAGOFF 

[1066  1 

270 

[716] 

280 

r=SQR(8) *50 

[632  ] 

290 

MOVE  0 ,r 

[457  ] 

300 

FOR  i=0  TO  360  STEP  10 

[820] 

310 

DRAW  r  *SIN ( i } , r  *COS ( i ) 

[1846  ] 

320 

NEXT 

[350] 

330 

PRINT  CHR  $(23); CHR  $ ( 1 ) 

[1978  ] 

340 

Tastaturabfrage,  Punkt  steuern 

[1321  ] 

350 

PLOT  x,y, 2 

1596] 

360  a$=INKEY$ : IF  a$=""  THEN  360  [1408] 

370  PLOT  x,y  [471 ] 

380  ON  INSTR(t$,a$>  GOTO  470,400,410,420,4  [2994] 

30 

390  GOTO  350  [470] 

400  y=y+2:GOSUB  450:GOTO  350  [2545 J 

410  y=y-2:GOSUB  450:GOTO  350  [22651 

420  x=x-2:GOSUB  440:GOTO  350  [3234] 

430  x=x+2:GOSUB  440:GOTO  350  [16591 

440  LOCATE  1,1: PRINT  USING '*##.##  Re";x/50:  [1593  ] 
RETURN 

450  LOCATE  1,2:PRINT  USIN Im";y/50:  [2084] 


RETURN 

460  '**•*  Folge  berechnen  u.  darstellen  [1791] 

470  re=x/50 :im=y/50: t=0  [786] 

480  re2»re*re: im2=im*im  £955] 

490  IF  re2  +  im2  >8  THEN  540  [1181] 

500  ira=re*im*2-y/50  [670] 

510  re=re2-im2-x/50  [1164] 

520  DRAW  re*50,im*50  [936] 

530  t=t  +  1  : LOCATE  1 , 4 : PRINT"Tiefe" ; t  [773] 

540  a$«INKEY$ : IF  aSs"”  THEN  540  [1372] 

550  IF  a$=CHR$ ( 1 27 ]  THEN  130  ELSE  480  (1267) 


10  . .  [1  460  ] 

20  '•••••••••  Komplexe  Grafik  •»•■•••••  [1815] 

30  . . .  [1460] 

40  .  (c)  1986  Matthias  Uphoff  ••••  [1415] 

50  . . . .  [1  460  ] 

50  '*••••  Basiclader  fuer  464  [1257] 

70  . . M-Code  poken  11011] 

80  MEMORY  &8FFF  [207] 

90  FOR  adr=&9000  TO  &91 3F  [10391 
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100  READ  a$ :v=VAL{ "&"+a$ )  (870] 

110  s=s+v:POKE  adr,v  [1258] 

120  NEXT  adr  1547] 

130  IF  s  <  >41 1 66  THEN  PRINT"DATAFEHLER  1":E  (3191] 
ND 

140  '*•*•*  DATA 1 s  fuer  M-Code  [899] 

150  DATA  3E, 08 , 1 1 , DO ,C7 ,DD, 6E, 00  (12021 

160  DATA  DD , 23 , DD, 66 , 00 ,DD, 23,01  [1239] 

170  DATA  05, 00, ED, BO, 3D, 20, EE, CD  [1095] 

180  DATA  32,91  ,EF, ID, 90, 21  ,80, FF  [1513] 

190  DATA  3E,C8,32,F8,C7,22,F9,C7  [1700] 

200  DATA  CD,09 ,BB, 30 ,03 ,FE,0D,C8  [15931 

210  DATA  11 ,40,01  , OE, 88 ,D5 ,E5,C5  [1395] 


220 

DATA 

3A,FB,C7,4?,0E,84,C5,21 

[950] 

230 

DATA 

EE , C7 , 1 1  , D5 , CF , D5 , 01 , 0A 

[1930  ) 

240 

DATA 

00, ED, B0, El, 11 , DF, CF, CD 

(859) 

250 

DATA 

E6 , 90 ,EB, 18, 28, C5, 21 , DA 

(14181 

260 

DATA 

CF, 11 ,D5, CF, CD,  15, 34, DD 

(1204) 

270 

DATA 

34,04,11 ,F3,C7, CD, 37, 33 

(18471 

280 

DATA 

21  , DF , CF ,11 , E  4 , CF , CD , 3  7 

(11961 

290 

DATA 

33,11 , EE , C7 , CD ,37,33,11 

(2267) 

300 

DATA 

D5, CF, CD, E6, 90, CD, 15, 34 

[1200] 

310 

DATA 

11 , DO, CF, CD, E6, 90, 21 , DA 

(1331  ) 

320 

DATA 

CF , 1 1 , E4 ,CF , CD, E6 , 90 , EB 

[869  ] 

330 

DATA 

CD, 15, 34, EB, 21 , DO, CF, CD 

[1  356  ] 

340 

DATA 

3F, 33 ,C1 ,DD,7E,04,B9,30 

(1  399  ) 

350 

DATA 

02,10,B2,C5,21 ,EE,C7 ,11 

[1686] 

360 

DATA 

E4,C7,CD,3F,33,F1 ,E6,03 

[1198] 

370 

DATA 

6F, 26 , A0 , 7E,C1 ,E1 ,AE,Al 

11511  ] 

380 

DATA 

AE, 77, CB, 09, 30, 01 ,23, Dl 

[1018] 

390 

DATA 

1B,7B,B2,C2,35,90,21 ,D0 

[1  630  ) 

400 

DATA 

C7 , 1 1 , EE, C7 ,CD,E6 ,90,21 

[1101  ] 

410 

DATA 

F3,C7,11 ,E9,C7,CD,3F,33 

[1114] 

420 

DATA 

2A,F9,C7, CD, 29 ,BC,3A,F8 

11766  ] 

430 

DATA 

C7,3D,C2,22,90,C9,E5,D5 

(1087) 

440 

DATA 

01 ,05, 00, ED, BO, Dl ,E1 ,C9 

1805) 

450 

DATA 

CD, 32, 91 ,3A,F8,C7,2A,F9 

[881  ] 

460 

DATA 

C7 ,EF ,30,90,21 ,D0 ,C7,3E 

(1050) 

470 

DATA 

04, DD, 5E, 00, DD, 23, DD, 56 

[1711  ] 

480 

DATA 

00, DD, 23, 01 ,05, 00, ED, B0 

[1062] 

490 

DATA 

3D, 20 ,EE,C9 , 21 , A4, C0, 11 

[2554 ] 

500 

DATA 

40,20,01 ,40,91 ,D5,E5,0A 

(1258  ] 

510 

DATA 

5F,7E,02,73,23,03,15,20 

[1027] 

520 

DATA 

F6  ,  El  ,  Dl  ,CD,  26  ,BC ,  1  D,  20 

(840) 

530 

DATA 

EC, C9 ,21 , 00 , A0 , 75 , 23 , 36 

(507) 

540 

550 

DATA 

F0,23,36,0F , 23 , 36 ,FF,C9 

[1233  J 
[117] 

560 

*  Initialisierung 

(1607  ] 

570  Start =& 9000: res tart=&90F0:getvar=S90FC 
:wswap=&91 14 

(4054) 

580 

tmax= 

&C7FB; zeile=&C7F8 : farbe=&C7FC 

[2688] 

590  links 
tief e=30 

=-0.7 :rechts=2.1 :unten=-1 :oben=1 : 

[3432]  ' 

600 

xl=250:xr=350 :yo=230 :yu=1 70 : p=1 

(2286] 

610 

t$=CHR$ (13) +CHR$ ( 224 ) 

[12091 

620 

FOR  i 

=  240  TO  2 5 1  : t$=t$+CHR$ ( i ) :NEXT 

[2891  ] 

630 

f  <0)  = 

0 :  f  ( 1  )=1  :f  (  2  )  =2 :  f  ( 3  )  =20 

[1575] 

640 

MODE 

1 

[506] 

650 

CALL 

wswap: CLS 

(401  J 

660 

WINDOW  4,1  7, 4, 9: PEN  3 

[903] 

670 

FOR  i 

=0  TO  3 

[474] 

680 

INK  i 

, f ( i ) : POKE  farbe+i, f ( i ) 

[2926] 

690  NEXT  1350] 

700  MOVE  36,362  £505] 

710  DRAWR  248 , 0 , 3 :DRAWR  0,-120:DRAWR  -248,  [3289] 
0 : DRAWR  0,120 

720  '***••  Hauptmenue  u.  Verzweigung  [1106] 

730  DATA  Zeichnen, Ausschnitt, Farben, Loesch  [2508] 
en, Laden, Speichern 

740  CLS :RESTORE  730  [579] 

750  FOR  i=1  TO  6  [448] 

760  LOCATE  3 , i :READ  a$:PRINT  a$  [2101] 

770  NEXT  [350] 

780  LOCATE  1  ,p^J>RINT  CHR$(243)  [2693  ] 

790  a$=INKEY$ : IF  a$=""  THEN  790  [1450] 

800  LOCATE  1 ,p: PRINT"  "  [1451] 

810  ON  INSTR( t$ ,a$ )  GOTO  850,880,830,840  [2645] 

B20  GOTO  780  [409] 

830  IF  p>1  THEN  p=p-1 :GOTO  780  ELSE  780  [2697] 

840  IF  p<6  THEN  p=p+1  :GOTO  780  ELSE  780  [1227] 

850  CALL  wswap  [508] 

860  WHILE  INKEY$="":WEND  [1607] 

870  CALL  wswap : GOTO  780  [433] 

880  ON  p  GOTO  1450,980,1610,640,1810  [1141] 

890  . Bild  speichern  [1294  ] 

900  CLS : PRINT  TAB< 3 ); CHR$ ( 24 ); "Speichern" ;  [3385] 
CHR$ ( 24 ) 

910  PRINT : PRINT"  Dateiname:"  (20411 

920  PRINT: INPUT"", na$  (6561 

930  CLS : IF  na$=""  THEN  740  [1360] 

940  CALL  wswap  [508] 

950  SAVE  " I "+na$+".PIC" ,b,&C000 , &4000  [2266] 

960  CALL^wswap : GOTO  740  [5051 

970  '«*»•*  Ausschnitt  festlegen  [2018] 

980  IF  PEEK( Zeile) =0  THEN  1340  (1543) 

990  CLS: CALL  wswap  [5151 

1000  PRINT  CHR$(23) ;CHR$(1  [1854]; 

1010  GOSUB  1970  [849] 

1020  a$=INKEY$ : IF  a$=""  THEN  1020  [1460] 

1030  GOSUB  1970  (8491 

1040  ON  IN STR  (t$,a$)  GOTO  1190,1230,1060,  [6392] 
1070,1080,1090,1100,1110,1120,1130,1140,11 
50,1160,1170 

1050  GOTO  1010  (345] 


1060  IF  yo<384  THEN  yo=yo+1 6 : yu=yu+1 6 :GOTO  [3425] 
1010  ELSE  1010 

1070  IF  yuj>1 4  THEN  yo=yo-1 6 :yu=yu-1 6 :GOTO  [2127]/ 
1010  ELSE  1010 

1080  IF  xl >1 4  THEN  xl=xl-1 6 :xr=xr-1 6 :GOTO  [2707] 
1010  ELSE  1010 

1090  IF  xr<624  THEN  xl=xl+1 6:xr=xr+1 6;GOTO  [20421 
1010  ELSE  1010 

1100  IF  yo<398  THEN  yo=yo+2:GOTO  1010  ELSE  [1363] 
1010 

1110  IF  yo>yu+4  THEN  yo=yo-2 :GOTO  1010  ELS  [2737] 
E  1010 

1120  IF  xl >0  THEN  xl=xl-2:GOTO  1010  ELSE  1  [2135] 
010 

1130  IF  xl <xr-4  THEN  xl=xl+2:GOTO  1010  ELS  12684] 
E  1010 

1140  IF  yu<yo-4  THEN  yu=yu+2:GOTO  1010  ELS  [2528] 
E  1010 

1150  IF  yu >0  THEN  yu=yu-2:GOTO  1010  ELSE  1  [2923] 
010 

1160  IF  xr  >xl+4.  THEN  xr=xr-2:GOTO  1010  ELS  [3354]/ 
E  1010 

1170  IF  xr <638  THEN  xr=xr+2:GOTO  1010  ELSE  [2460] 
1010 


1180  *  [1171 

1190  GOSUB  2020  [871 ] 

1200  af lag=-1  13591 

1210  PRINT  CHR$ ( 23 ) ;CHR$ ( 0 )  [1984] 

1220  CALL  wswap :GOTO  740  [505] 

1230  **••••  Ausschnitt  anzeigen  [2304] 

1240  GOSUB  2020  [871  ] 

1250  CALL  wswap  [508] 

1260  PRINT  [361] 

1270  PRINT  CHR$( 242); S5R$(al)  [1211]f 

1280  PRINT  CHR${243);ST^$(ar)  [1455)\ 

1290  PRINT  CHR$  (  240  } ;  STR$  (ao  )  [1138]^ 

1300  PRINT  CHR$(241  );sBr$(au)  [1434  ]' 

1310  WHILE  INKEY  $ = "  "  : WEND  (16071 

1320  CLS  :CALL  wswap -.GOTO  1010  (10421 

1330  Ausschnitt  eingeben  [2385] 

1340  CLS: PRINT  CHR$( 24 ); "Bitte  eingeben" ;C  [2870 J 
HR$ ( 24 ) 

1350  PRINT  CHR$ (242);: INPUT"  ",a$  [1527] 

1360  IF  a$=""  THEN  740  ELSE  al=VAL(a$)  [1171] 

1370  PRINT  CHR$(243>;:  INPUT"  ",a$  11629), 

1380  IF  a$=" "  THEN  740  ELSE  ar=VAL(a$)  [1653] 

1390  PRINT  CHR$ ( 240 ) ; : INPUT"  ",a$  [11431 
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1400  IF  a$-""  THEN  740  ELSE  ao»VAL(a$) 

1410  PRINT  CHR$ ( 241 ) J : INPUT"  ",a$ 

1420  IF  a$«""  THEN  740  ELSE  au»VAL(a$) 

1430  aflag=-1 :GOTO  740 

1440  '•••••  Tiefe  eingeben,  Zeichnen 

14S0  CLS 

1460  IF  PEEK( zeile ) >1  THEN  CALL  wswap:CALL 
re Start: CALL  wswap:GOTO  740 
1470  PRINT  CHR$( 24); "Bitte  eingeben" ;CHR$ < 
24) 

1480  PRINT 

1490  PRINT  "Tief e(";MID$(STR$( tief e),2);") 
7 

1500  INPUT" " ,a$ 

1510  CLS:IF  a$=""  THEN  740 

1520  IF  VAL( a$ ) >255  THEN  CLSlGOTO  1470 

1530  tiefe=VAL(a$) 

1540  IF  aflag  THEN  links=al :rechts=ar:unte 
n*au:oben=ao 

1550  dx=( rech ts-link s)/319:dy=( oben -unten ) 
/I  99 

1560  POKE  tmax, tiefe 
1570  CALL  wswap 

1580  CALL  start,@unten,@links,@dy,@dx,@obe 

n , @unten , @rechts , @links 

1590  CALL  wswap :GOTO  740 

1600  Farben  einstellen 

1610  CLS 

1620  FOR  i=0  TO  3 
1630  LOCATE  6,i+2 
1640  PEN  i: PRINT  CHR$(143); 

1650  PEN  3:  PRINT  USING"###" ;  f  (  i  ) 

1660  NEXT 
1670  q=0 

1680  LOCATE  4,q+2:PRINT  CHR$(243) 

1690  a$=INKEY$ : IF  a$=""  THEN  1690 
1700  LOCATE  4, q+ 2: PRINT"  " 

1710  ON  INSTR( t$ ,a$ )  GOTO  740,740,1730,174 

0,1750,1760 

1720  GOTO  1680 

1730  IF  q >0  THEN  q=q-1:GOTO  1680  ELSE  1680 
1740  IF  q<3  THEN  q=q+1:GOTO  1680  ELSE  1680 
1750  IF  f (q) >0  THEN  f <q) =f (q) -1 :GOTO  1770 
ELSE  f (q)=26:GOTO  1770 

1760  IF  f (q )  <26  THEN  f(q)=f(q)  +  1  ELSE  f(q) 
=0 

1770  INK  q, f (q) : POKE  farbe+q,f(q> 

1780  LOCATE  7^g+2: PRINT  USING"#?#" ; f (q) 
1790  GOTO  1680" 

1800  '*••••  Bild  laden 
1810  CLS 

1820  PRINT  TAB ( 5 ) ;CHR$ ( 24 ) ; "Laden" ;CHR$( 24 

) 

1830  PRINT: PRINT"  Dateiname:" 

1840  PRINT : INPUT"", na $ 

1850  CLS:IF  na$=""  THEN  740 
1860  FOR  i=0  TO  3: INK  i,0:NEXT 
1870  CALL  wswap 
1880  LOAD  " i "+na$+". PIC" 

1890  FOR  i=0  TO  3 

1900  f (i)=PEEK(farbe+i):INK  i,f(i) 

1910  NEXT 

1920  tief e=PEEK( tmax) 

1930  CALL  getvar,@oben,@unten,@rechts,@lin 
ks 

1940  WHILE  INKEY$="":WEND 


[11721 

[1  344  J 

[1238J; 

[689] 

[2110] 

[91  ] 

[37401 

[24551 

[361  1 
[16201 

[456  1 
11502] 
12693  ] 

[1  4251/ 
[1954  1, 

[2277] 

14281 
(508  1 
[4361  1 

[5051 

115631 

191  ] 

1474] 

1760] 

11909] 

1691  1 

1350  1 

1261  ] 

[1885] 

[1462] 

[1526] 

13612] 

13951 

[898] 

[2094] 

[2526] 

12003) 

[1  4541/ 
[1451 
1395] 
[988] 

[91  ] 
[1993  1 

[2041  J 
1656)  / 
[1360] 
16621 
15081  V  * 
[1078  |U 
[474  1 
[37701 
[3501 
[1189] 
[3446  1 

[16071 


1950  CALL  wswap:GOTO  740 
1960  '•*•**  SUB  Rahmen  zeichnen 
1970  dx«xr-xl:dy=xo-yu 
1980  MOVE  xl,yo 

1990  DRAWR  dx,0:DRAWR  0, -dy :DRAWR  -dx,0:DR 
AWR  0 ,dy 
2000  RETURN 

2010  SUB  Ausschnitt  berechnen 

2020  dx»(rechts-links)/638:dy=(oben-unten) 

/398 

2030  al=links+xi*dx:ar=links+xr*dx 
2040  au=unten+yu*d_y :ao=unten+yo*dy 
2050  RETURN 


[5051 
[1296] 
[2292  1 , 
[458] 
[2462] 

[555] 

[862] 

13001 

[1617  \ 

[2405 

[555] 


60  '**•**  Basiclader  fuer  664/6128 

80  MEMORY  &BFFF 

90  FOR  adr=&9000  TO  &91  3F 


[1525] 

[207] 

[10391 


100 

READ 

a$:v=VAL("Ä"+a$) 

[870] 

110 

s=s+v:POKE  adr,v 

[1258] 

120 

NEXT 

adr 

[5471 

130 

ND 

IF  s  < 

>42063  THEN  PRINT"DATAFEHLER 

1  ":E  [3088] 

140 

1  *  DATA ' s  fuer  M-Code 

[899] 

150 

DATA 

3E, 08 , 1 1 ,D0 ,C7 ,DD, 6E, 00 

[1202  ) 

160 

DATA 

DD, 2 3, DD, 66, 00, DD, 23 ,01 

[1239  1 

170 

DATA 

05, 00, ED, B0, 3D, 20, EE, CD 

[10951 

180 

DATA 

32,91 ,EF, ID, 90, 21 ,80, FF 

[15131 

190 

DATA 

3E,C8,32,F8,C7 ,22,F9,C7 

[1700  1 

200 

DATA 

CD, 09, BB, 30, 03 ,FE , 0D,C8 

[1  593  1 

210 

DATA 

11  ,40,01 ,0E,88,D5,E5,C5 

[13951 

220 

DATA 

3A,FB,C7 ,47, 0E, 84 ,C5 ,21 

[9501 

230 

DATA 

EE , C7 , 1 1 ,D5 ,CF,D5,01 ,0A 

[1930  1 

240 

DATA 

00, ED, B0, El ,11 , DF, CF, CD 

[8591 

250 

DATA 

E6,90,EB,18,28,C5,21 ,DA 

[1418] 

260 

DATA 

CF , 1 1 , D5 ,CF , CD, 77 , 35 , DD 

[15891 

270 

DATA 

34,04,11,F3,C7 ,CD, 9A, 34 

[1998  ] 

280 

DATA 

21 , DF, CF, 11 ,E4 ,CF, CD, 9A 

[1230  ] 

290 

DATA 

34,11 , EE ,C7 ,CD, 9A, 34,11 

[1919] 

300 

DATA 

D5, CF, CD, E6, 90, CD, 77, 35 

[1027  1 

310 

DATA 

11 , DO , CF , CD ,E6, 90,21 ,DA 

[1331  ] 

320 

DATA 

CF ,11 ,E4,CF,CD,E6,90,EB 

[869  ] 

330 

DATA 

CD, 77, 35, EB, 21 , DO, CF, CD 

[1560  ] 

340 

DATA 

A2 , 34 ,C1 ,DD,7E,04,B9,30 

[16641 

350 

DATA 

02,10, B2,C5, 21 ,EE,C7 ,11 

[1686  ] 

360 

DATA 

E4,C7,CD,A2,34,F1 ,E6,03 

[1024  ] 

370 

DATA 

6F,26,A0,7E,C1 ,E1 ,AE,A1 

[1511  ] 

380 

DATA 

AE, 77, CB, 09, 30, 01  ,23, Dl 

[1018) 

390 

DATA 

1B,7B,B2,C2,35,90,21  ,D0 

[1630  ] 

400 

DATA 

C7 , 1 1 ,EE,C7 ,CD,E6 ,90,21 

[1101  J 

410 

DATA 

F3 ,C7 ,11 ,E9,C7,CD,A2,34 

[1  547  ] 

420 

DATA 

2 A,F9 ,C7 ,CD, 29 , BC , 3 A,F8 

[1766  J 

430 

DATA 

C7 , 3D,C2 , 22 , 90 ,C9 ,E5 ,D5 

[1087  ] 

440 

DATA 

01 ,05, 00, ED, B0, Dl ,E1 ,C9 

[8051 

450 

DATA 

CD, 32, 91 ,3A,F8,C7,2A,F9 

[881  1 

460 

DATA 

C7 ,EF, 30 , 90,21 ,D0,C7,3E 

[10501 

470 

DATA 

04, DD, 5E, 00, DD, 23, DD, 56 

[1711  1 

480 

DATA 

00, DD, 23,01  ,05, 00, ED, B0 

[1062  ] 

490 

DATA 

3D,20,EE,C9,21 , A4, C0, 11 

[2554 ] 

500 

DATA 

40,20,01 ,40,91 ,D5,E5,0A 

[12581 

510 

DATA 

5F,7E,02,73,23,03,15,20 

[10271 

520 

DATA 

F6,E1 ,D1 , CD ,26, BC , 1 D , 20 

[8401 

530 

DATA 

EC ,C9 ,21 , 00 , A0 , 75 , 23 , 36 

(507  J 

540 

DATA 

F0,23,36,0F,23,36,FF,C9 

[1233  1 

+ 


10  Stk 


Alles  zu  den  Schneider  GPC's  4-  Joyce 

Uber  100  Spiele.  Schon  ab  SFr.  9.90.- 
Anwendersof tware ,  Hardwareperipherie 
zu  super  Preisen. 

Schweizer  Soft-  4-  Hardwareversand. 


95.- 

SFr. 


Infos  +  Katalog  + 
Bestellung  bei  : 


3" 


5  Stk  : 


49.- 


©HiraY  - 

Postfach 
CH -861 2  Uster  2 
Ol  /  820  22  64 


ulerslore 


CPC  464  mil  Grlinmonllor 

548,— 

Diskettenlaufwerk  ODI-1 

498  — 

PAKET  CPC  464/önin  +  0DI-1 

995.— 

MODULATOR  MP? 

148  — 

VORTEX-  Laufwerk  F1-X/MI-X 

aA 

708KB.  VOOS  2.0,  5.25  oder  3,5  Zoll 

DISKETTEN  (10  Stuck) 

FUJI  3,5"  MF  1  DO 

65,— 

FUJI  3.5"  MF  200 135  TPI 

65, — 

PRECISI0N  5.25"  20  96  TPI 

44.90 

JOYCE  Zweitlaufwerk  FD-2 

628,— 

JOYCE  RAM-Erweileruno 

145,— 

JOYCE  Nachrtistsaw 

769— 

Laufwerk  FD-2  und  RAM-Erweilerung 

JOYCE-Momtorvorsat? 

98  — 

JOYCE-Schnittstelle 

148, — 

JOYCE-Malllng-System 

189,— 

JOYCE-Datenverarb  PROMPT 

69,— 

JOYCE-Serlenbr  PR0MPT-DRUCK  49,— 
JOYCE  3D-CL0CK  CHESS  (Grafik)  79. — 


Hochstraße  11 
8500  Nürnberg  80 
S  09 11/289028 


999.- 
1699. — 
99. — 


CPC  6128  mit  Grünmonitor 
CPC  6128  mil  Farbmonitor 
0ATENREC0RDER  mil  Kabel 
SOFTWARE 
COMPACKJCPC  oder  JOYCE 
TEXPACK  CPC 
HISOFTC-COMPILER 
WORDSTAR.  dBASE, 

MULTI  PLAN 
DR  GnArH 
DR  DRAW 
NEVADA-CO0OL 
NEVADA-FORTRAN 
DR  CBASIC-C0MPIL6R 
SMALL  C 
DR  PASCAUMT+ 

TURBO-PASCAL  m.  Grallk 
TURB0-PASCAL 
SUPERCALC  2/CPC  6128 
CYRUS  Il-Chess  (WO)  39,-749.— 
C0L0SSUS  4  cness  (lOD)  34, — /44. — 


798, — 
(U)  19Ö, — 
(D|  159,— 

je  199, — 
(D)  199. — 
(D)  199,— 
(D)  aA 
(D)  aA 
(D)  174  — 
(0)  148, — 
(0)  174.— 
(D)  259. — 
(D)  199. — 
(D)  198  — 


Wir  führen  zu  den  original  SCHNEIDER-Produkten  Software,  Bücher  und 
Zubehör  verschiedener  Firmen  wie  DATA  BECKER,  VORTEX,  CUMANA, 
ISS,  RUSHWARE,  MARKT  &  TECHNIK,  SYBEX,  VOGEL-Verlag  usw.l 
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Nachdem  Sie  in  der  vorangegangenen 
Folge  im  Zusammenhang  mit  dem 
CBASIC-Compiler  einige  neue  Be¬ 
griffe,  wie  ”globale  und  lokale  Varia¬ 
blen”  kennengelemt  haben,  wollen  wir 
Ihre  neu  erworbenen  Kenntnisse  in  den 
nächsten  Folgen  noch  weiter  vertiefen. 
Ausgehend  von  CBASIC  soll  unser  Bei¬ 
spielprogramm  vom  letzten  Mal  in  der 
nächsten  Folge  (Teil  6)  in  einen  ent¬ 
sprechenden  Algorithmus  für  die  be¬ 
kannte  Hochsprache  FORTRAN  umge¬ 
wandelt  werden.  Darauf  vorbereitend 
wird  in  dieser  Folge  zunächst  einmal 
der  einzige  zur  Zeit  auf  den  Schneider 
CPC’s  für  diese  Sprache  verfügbare 
Compiler,  mit  Namen  NEVADA  FOR¬ 
TRAN,  vorgestellt.  Beide  Programme 
in  CBASIC  und  FORTRAN  sollen 
dann  in  der  nächsten  Ausgabe  auch 
noch  mit  einer  entsprechenden  Dar¬ 
stellung  in  PASCAL  verglichen  werden. 

CP/M 

FORTRAN  ist  die  älteste  unter  den 
moderneren  Programmiersprachen 
und  wird  infolgedessen  auch  heute 
noch  sehr  häufig  eingesetzt.  Wie 
schon  der  Name  FORTRAN  (For- 
mula  Translator)  sagt,  orientiert  sich 
die  Sprache  sehr  stark  an  mathemati¬ 
schen  und  technischen  Problemstel¬ 
lungen.  Sie  ermöglicht  daher  eine  ef¬ 
fiziente  Darstellung  auch  komplexe¬ 
rer  Algorithmen  in  den  natur-  und 
ingenieurwissenschaftlichen  Fach¬ 
gebieten  der  Universitäten  in  aller 
Welt.  Doch  auch  in  anderen  Benut¬ 
zerkreisen  war  der  Siegeszug  dieser 
Hochsprache  seit  der  ANSI  Norm  für 
FORTRAN  IV  im  Jahre  1966,  die  den 
Auswüchsen  von  immer  neueren  Ver¬ 
sionen  seit  1958  mit  Erfolg  gegen¬ 
übergesetzt  wurde,  nicht  mehr  aufzu¬ 
halten,  so  daß  man  heute  in  fast  allen 
technischen  Fachabteilungen  der 
Industrie  auf  ein  riesengroßes  An¬ 
gebot  von  FORTRAN-Programmen 
zurückgreifen  kann.  Durch  die  Mo¬ 
dularität  der  FORTRAN  Unterpro¬ 
gramm-Bibliotheken  kann  ein  FOR- 
TRAN-Programmierer  meist  auf  eine 
große  Auswahl  von  Detaillösungen, 
die  in  dieser  Sprache  geschrieben 
wurden,  zurückgreifen  und  durch 
einen  entsprechenden  SUBROUTI- 
NE-Aufruf  seinem  Programm  zugäng¬ 
lich  machen.  Das  ist  auch  der  Haupt¬ 
grund,  warum  die  viel  modernere,  aber 
auch  jüngere  Hochsprache  PASCAL 
noch  nicht  eine  genauso  große  Ver¬ 
breitung  gefunden  hat 

Einen  ISO-Standard  gibt  es  hier  erst 
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seit  1980.  BASIC  wurde  übrigens  aus 
FORTRAN  abgeleitet  was  schon 
durch  einen  Vergleich  von  Listings 
beider  Sprachen  sichtbar  wird,  wobei 
man  gerade  bei  der  String-Verarbei¬ 
tung  und  den  Ein-/Ausgabe-Opera- 
tionen  eine  komfortablere  Program¬ 
mierumgebung  geschaffen  hat.  Das 
Konzept  der  Modularität  bei  der  Be¬ 
arbeitung  von  Unterprogrammen 
wurde  jedoch  völlig  vernachlässigt 
was  heute  in  fast  jedem  längeren 
BASIC-Programm  zu  einem  un¬ 
durchsichtigen  Spaghetti-Code  führt. 
Auch  CBASIC,  das  ja  bereits  in  der 
letzten  Folge  vorgestellt  wurde,  kann 
dieses  ”Muß  bei  längeren  Program¬ 
men”  leider  nicht  bieten.  Erfreulicher¬ 
weise  wurde  jedoch  immerhin  die 
auch  unter  FORTRAN  und  PASCAL 
sehr  nützliche  FUNCTION-Anwei- 
sung  zum  ersten  Mal  nahezu  voll¬ 


unter  CP/M  sind  ”nur”  FORTRAN 
IV  Compiler  verfügbar.  Dabei  muß 
man  sich  immer  vor  Augen  halten, 
daß  FORTRAN  eigentlich  für  Main¬ 
frames  konzipiert  war  und  es  infolge¬ 
dessen  schon  als  programmiertech¬ 
nische  Großtat  bezeichnet  werden 
muß,  diesen  Compiler  überhaupt  auf 
Microcomputer  zu  übertragen.  Ver¬ 
schiedene  FORTRAN  77  Compiler 
trifft  man  zur  Zeit  aber  schon  auf  16- 
Bit-Micros  an.  Diese  haben  z.B.  unter 
MSDOS  eine  Länge  von  einigen  100 
kByte  und  sind  selbst  mit  zwei  360  k- 
Byte  Floppylaufwerken  nur  sehr  um¬ 
ständlich  zu  handhaben.  In  diesem 
Fall  muß  also  schon  eine  Festplatte 
her,  was  natürlich  die  Kosten  neben 
den  Anschaffungskosten  für  den  Com¬ 
piler,  der  unter  MSDOS  mit  1000,- bis 
2000,-  DM  zu  Buche  schlägt,  noch  ein¬ 
mal  in  die  Höhe  treibt  Weiterhin  stellt 


und  seine  Möglichkeiten 


ständig  in  einem  BASIC-Dialekt 
implementiert,  sieht  man  einmal  von 
den  noch  besseren  BASICs  für  die 
HP-Rech  ner  ab  (s.a.  CPC  Nr.  6).  PAS¬ 
CAL  verhält  sich  in  diesem  Zusam¬ 
menhang  in  jeder  Beziehung  wie  der 
lachende  Dritte.  Alle  positiven  Eigen¬ 
schaften  von  FORTRAN,  wie  z.B. 
Modularität  bei  der  Erstellung  von 
Unterprogrammen,  wurden  hier  über¬ 
nommen  bzw.  verfeinert.  Zusätzlich 
wird  durch  die  Strukturierungs¬ 
möglichkeiten  der  Sprache  endlich 
das  Schreiben  von  später  noch  lesba¬ 
ren  Programmen  unterstützt,  was  ge¬ 
rade  bei  der  sogenannten  Software- 
Pflege  sehr  wichtig  ist.  Ein  PASCAL- 
Programmiererwird  von  vorneherein 
gezwungen,  sich  streng  an  die  Regeln 
der  Strukturierung  zu  halten.  FOR¬ 
TRAN  bietet  auch  die  Möglichkeit, 
übersichtlich  zu  programmieren,  er¬ 
fordert  jedoch  vom  Programmierer 
eine  entsprechende  Erfahrung  und 
Selbstdisziplin.  Eine  Schwäche  von 
FORTRAN  IV  liegt  in  der  fast  völlig 
fehlenden  Zeichenverarbeitung.  Um 
diesen  Mangel  zu  beseitigen,  wurde 
1977  erneut  ein  Standard  für  eine  er¬ 
weiterte  FORTRAN-Version  ge¬ 
normt,  die  mittlerweile  für  alle  Groß¬ 
rechner  verfügbar  ist 

FORTRAN  77  ermöglicht  im  ”full 
language  Standard”  sogar  die  Verar¬ 
beitung  von  Teilzeichenketten.  Der 
Compiler  ist  aber  dadurch  so  umfang¬ 
reich  geworden,  daß  es  nicht  mehr  mög¬ 
lich  war,  FORTRAN  77  auf  einem  8- 
Bit-Rechner  zu  implementieren.  D.h., 


z.B.  die  Version  von  MICROSOFT,  die 
1982  übrigens  als  erster  FORTRAN 
77  Compiler  für  MSDOS  auf  den 
Markt  kam,  auch  nach  mehrfachen 
Revisionen  nur  ein  sogenanntes  Sub¬ 
set  dar.  Im  Klartext  heißt  das,  daß 
nicht  alle  Befehle  vorhanden  sind, 
was  immer  dann  sehr  ärgerlich  ist, 
wenn  man  sich  den  eingangs  erwähn¬ 
ten  durch  die  strenge  Normierung  ge¬ 
währleisteten  hohen  Grad  an  Porta¬ 
bilität  bei  der  Programmierung  mit 
FORTRAN  zunutze  machen  möchte 
und  fertige  Module  von  anderen 
Rechnern  verwendet  werden  sollen. 
Das  Problem  der  Kommunikation 
zwischen  zwei  verschiedenen  Rech¬ 
nern  ist  dabei  meist  nur  noch  von  se¬ 
kundärer  Bedeutung,  das  im  Zeitalter 
der  genormten  Schnittstellen  norma¬ 
lerweise  sehr  schnell  gelöst  werden 
kann.  Viele  Programme  sind  aller¬ 
dings  noch  in  FORTRAN  IV  geschrie¬ 
ben  und  werden  normalerweise  auch 
von  einem  abgemagerten  FORTRAN 
77  Compiler  anstandslos  übersetzt, 
der  ja  bis  auf  wenige  Ausnahmen 
auch  den  FORTRAN  IV-Befehlssatz 
beherrscht. 

Von  den  drei  bekannten  FORTRAN 
IV-Versionen  unter  CP/M  wird  zur 
Zeit  nur  NEVADA  FORTRAN  über 
die  Firma  Schneider  Data  zu  einem 
sehr  günstigen  Preis  von  DM  189,- 
auf  3”-Disketten  vertrieben.  Gegen¬ 
über  dem  bekannten  F80-Compiler 
von  MICROSOFT,  der  für  andere 
CP/M-Systeme  in  der  Größenord¬ 
nung  von  ca.  1500  -  DM  angeboten 


wird,  hat  er  sogar  eine  ganze  Reihe 
von  Vorteilen,  auf  die  wir  im  folgen¬ 
den  noch  eingehen  werden.  Bedauer¬ 
lich  ist  dagegen,  daß  der  wirklich  gute 
PROFOR-FORTRAN-Compiler  von 
PROSPERO  ebenfalls  nicht  im 
Schneider-Diskettenformat  angebo- 
ten  wird,  obwohl  er  sozusagen  das 
”Non  plus  Ultra”  für  den  Z80- 
Prozessor  darstellt.  Um  zu  dieser 
Aussage  zu  gelangen,  wurden  ver¬ 
schiedene  FORTRAN-Source-Pro- 
gramme,  die  der  Autor  sowohl  unter 
dem  Betriebssystem  MSDOS  als 
auch  mit  einem  HP  1000- Rechner 
unter  strenger  Einhaltung  des 
FORTRAN-IV-Befehlssatzes  erstellt 
hat,  auf  den  Schneider- Rechner  trans¬ 
feriert  (s.a.  CPC  Sonderheft  Nr.  2/86 
"Programmaustausch  mit  MSDOS 
Rechnern")  und  hier  mehr  oder  weni¬ 
ger  erfolgreich  compiliert.  Obwohl 
auf  den  etwas  exotischen  Datentyp 
COMPLEX  verzichtet  wurde,  mach¬ 
te  eine  Flut  von  Fehlermeldungen 
sehr  schnell  deutlich,  daß  sowohl  der 
F80  als  auch  der  NEVADA-FOR- 
TRAN-Compiler  im  Gegensatz  zum 
PROFOR-Compiler  nur  ein  Subset 
der  ANSI-66-Norm  darstellen.  Beim 
NEVADA-FORTRAN-Compiler  kön¬ 
nen  die  Befehle  jedoch  ziemlich  rasch 
umgeschrieben  werden,  wenn  man 
erst  einmal  herausbekommen  hat, 
welche  neuen  Regeln  man  z.B.  bei  der 
BLOCK  DATA-  oder  DATA-Anwei- 
sung  befolgen  muß.  Alle  Einschrän¬ 
kungen  gegenüber  ANSI  66  sind 
erfreulicherweise  auch  noch  einmal 
im  Handbuch  auf  Seite  136  separat 
aufgeführt,  so  daß  man  hier  schon 
einmal  vorgewarnt  wird. 


Komfortable 

Fehlerbehandlung 


Sehr  hilfreich  sind  bei  der  Fehlerbe¬ 
handlung  auch  die  sogenannten 
Supersets  von  NEVADA  FOR¬ 
TRAN,  die  es  allerdings  wirklich  in 
sich  haben.  Eine  Fülle  von  sehr  nütz¬ 
lichen  Optionen  ermöglichen  auch  in 
der  problematischen  Run-time-Pha- 
se  eine  sehr  genaue  Lokalisierung 
und  Analyse  des  aufgetretenen 
Fehlers.  So  ist  es  z.B.  möglich,  auch 
bei  verschachtelten  SUBROUTINE- 
Aufrufen  den  Weg  durch  Ausgabe  der 
entsprechenden  Zeilennummern  zu¬ 
rückzuverfolgen.  Sogar  eine  TRACE- 
Funktion  ist  vorgesehen,  um,  wie  in 
BASIC,  die  Zeilennummer  der  je¬ 
weils  ausgeführten  Anweisung  auf 
dem  Bildschirm  auszugeben.  Die 
Zeilennummern  werden  übrigens 
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erst  vom  Compiler  hinzugefügt,  da 
FORTRAN,  ebenso  wie  CBASIC  und 
PASCAL,  bei  der  Programmeingabe 
auf  Zeilennummem  verzichtet  Sprung¬ 
anweisungen,  die  übrigens  wie  in 
BASIC  mit  einem  GOTO  aktiviert 
werden,  erhalten  daher  als  Adresse 
keine  Zeilennummern,  sondern  soge¬ 
nannte  Labels.  Beim  Eintreten  einer 
Fehlerbedingung  kann  mit  NE¬ 
VADA  FORTRAN,  ähnlich  einer 
ON  ERROR  GOSUB-Anweisung 
unter  BASIC,  zu  einem  solchen  Label 
gesprungen  werden,  um  den  Fehler 
durch  Ausgabe  der  entsprechenden 
Meldung  zu  analysieren.  In  diesem 
Fall  kommt  es  also  nicht  zu  einem 
unter  Umständen  unerwünschten 
Abbruch  des  Programmes.  Eine 
DUMP-Anweisung  ermöglicht  im 
Falle  eines  Fehlers  außerdem  noch 
die  Ausgabe  aller  gewünschter  Va¬ 
riablen,  was  von  geplagten  FOR- 
TRAN-Programmierem  ebenfalls 
als  sehr  nützlich  anzusehen  ist. 


Der  Runtimeloader 


Arbeiten  alle  drei  Compiler  schon 
ziemlich  schnell,  so  erlebt  man 
beim  Linken  der  Module  mit  NE¬ 
VADA  FORTRAN  sein  blaues  Wun¬ 
der.  Das  compilierte  Programm  wird 
nicht  etwa  so,  wie  man  es  z.B.  von 
CBASIC  gewöhnt  ist,  mit  einer 
Bibliotheks-Datei  gelinkt,  die  stück¬ 
chenweise  von  der  Diskette  gelesen 
werden  muß,  um  anschließend  wie¬ 
der  zwar  platzsparend  aber  umständ¬ 
lich  auf  die  Diskette  zurückgeschrie¬ 
ben  zu  werden.  Der  sogenannte  Run¬ 
timeloader  hält  alle  benötigten 
Module  ständig  im  Speicher  und 
kann  diese  in  Windeseile  aufrufen. 
D.h.,  sofort  nach  dem  Compilieren 
kann  unser  Programm  über  diesen 
dynamischen  Linker  aufgerufen  wer¬ 
den,  was  eine  sehr  große  Zeiter¬ 
sparnis  bewirkt.  Gerade  beim  Suchen 
nach  versteckten  Fehlern  wird  der 
entnervte  FORTRAN-Programmie- 
rer  angesichts  der  sich  nach  jeder  Än¬ 
derung  im  Source-Programm  ständig 
wiederholenden  langwierigen  Link- 
Prozeduren  diesen  Vorteil  sehr  zu 
schätzen  wissen.  Der  Runtimeloader 
darf  übrigens  nicht  mit  einem  soge¬ 
nannten  Runtime-Interpreter  ver¬ 
wechseltwerden,  der  z.B.  für  CBASIC 
angeboten  wird,  allerdings  nicht  im 
Lieferumfang  von  Markt  &  Technik 
enthalten  ist.  Will  man  sich  von  sei¬ 
nem  mit  NEVADA  FORTRAN  com- 
pilierten  Programm  nun  auch  ein 
vom  Linker  unabhängiges,  als  COM- 
File  sofort  ablauffähiges  Modul  er¬ 


stellen,  werden  allerdings  auch  die 
Nachteile  dieser  Vorgehensweise 
deutlich.  Das  Linken  geht  zwar 
immer  noch  hübsch  schnell,  wirft 
man  jedoch  einen  Blick  auf  die  Länge 
des  erzeugten  COM-Files,  so  stellt 
man  fest,  daß  der  gesamte  Runtime¬ 
loader  mitkopiert  wurde,  wodurch 
auch  bei  kürzeren  Programmen  sehr 
schnell  Code  von  über  20  kByte  er¬ 
zeugt  wird.  D.h.,  die  maximale  Länge 
von  FORTRAN-Programmen  wird 
immer  durch  die  16  kByte  für  den 
Runtimeloader  geschmälert.  Eine 
ähnliche  Einschränkung  müssen  wir 
übrigens  auch  beim  Arbeiten  mit 
TURBO  PASCAL  in  Kauf  nehmen, 
hier  beansprucht  die  Runtime- 
Library  allerdings  nur  ca.  8  kByte. 
Überhaupt  erinnert  die  sehr  komfor¬ 
table  Aufmachung  von  NEVADA 
FORTRAN  mit  seinen  vielen  Featu¬ 
res  ein  wenig  an  TURBO  PASCAL. 
Ebenso  wie  bei  TURBO  PASCAL 
empfiehlt  sich  auch  hier  die  Anschaf¬ 
fung  einer  Speichererweiterung,  ist 
aber  keine  Voraussetzung.  Alles,  was 
fehlt,  ist  noch  ein  vernünftiger 
Programmeditor.  Wie  von  der  Firma 
Schneider  Data  aber  zu  erfahren  war, 
soll  NEVADA  FORTRAN  in  Zu¬ 
kunft  auch  mit  einem  solchen  Editor 
ausgeliefert  werden.  Schön  wäre  es, 
wenn  Schneider  Data  sich  für  den 
sehr  schnellen,  WORDSTAR  kom¬ 
patiblen  ED80-Fullscreen-Editor 
entscheiden  könnte,  der  fast  genau 
die  gleichen  positiven  Eigenschaften 
wie  der  ebenfalls  WORDSTAR  kom¬ 
patible  TURBO  PASCAL-Editor  be¬ 
sitzt.  Der  ED80  hat  sich  unter 
HISOFT  C,  das  ebenfalls  von  Schnei¬ 
der  Data  angeboten  wird,  schon  gut 
bewährt.  Beim  Auftreten  eines 
Compilier-Fehlers  wird  z.B.  der 
ED80  automatisch  aufgerufen  und 
die  entsprechende  Zeile  angezeigt. 
Ein  gut  gemachtes,  über  200  Seiten 
umfassendes  englisches  Handbuch 
mit  ausführlichen  Beispielprogram¬ 
men,  die  erfreulicherweise  auch  auf 
der  Diskette  enthalten  sind,  runden 
den  positiven  Eindruck  ab.  Alle  be¬ 
nötigten  NEVADA  FORTRAN- 
Module  sind  nicht  kopiergeschützt 
und  lassen  sich  daher  ohne  weiteres 
auf  die  VORTEX-Ramdisk  kopieren, 
woraus  noch  einmal  eine  Erhöhung 
der  Geschwindigkeit  resultiert. 

Wie  schon  eingangs  angekündigt, 
werden  wir  beim  nächsten  Mal  noch 
einmal  auf  verschiedene  Punkte 
beim  Arbeiten  mit  FORTRAN  zu 
sprechen  kommen.  Weiterhin  wollen 
wir  die  Begriffe  globale  und  lokale 
Variablen  erneut  aufgreifen  und  an 
einem  entsprechenden  Beispiel  ver¬ 
deutlichen.  Dipl.-Ing.  H.  Scheruhn 
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Softkeys 

am 

CRC 


für  464-664-«  128  y  g 


Mit  minimalem  Hardwareaufwand  und  ein  wenig  Soft¬ 
ware  können  Sie  Ihrem  CPC  ein  zusätzliches,  zudem  frei 
programmierbares  Tastenfeld  verpassen. 

Für  eine  solche  Anwendung  ist  eine  Fülle  von  Anwen¬ 
dungsgebieten  denkbar;  so  können  per  Tastendruck  Teile 
eines  Programmes  aufgerufen  werden,  die  Softkeys  kön¬ 
nen  als  Funktionstasten  programmiert  und  mit  einigen 
häufig  verwendeten  Befehlen  belegt  werden;  ebenso  kann 
die  Abfrage  der  Tastenabfrage  ins  Betriebssystem  verlegt 
werden.  Die  Bedienung  des  Keyboards  wird  durch  die 
Softkeys  in  keiner  Weise  berührt. 

Die  aktuelle  Belegung  der  Softkeys  kann  in  einer  Menü¬ 
leiste  am  unteren  Bildschirmrand  ständig  eingeblendet 
werden. 


fer  übergibt,  muß  dieser  vor  Eingabebefehlen  (Input  etc.) 
gelöscht  werden.  Hierzu  dient  die  kleine  Routine  in  Zeile 
110,  die  den  Puffer  nach  jeder  Joystickabfrage  wieder 
löscht. 

Listing  2  ist  eine  Demo  zur  Zuweisung  bestimmter  Funktio¬ 
nen  für  die  einzelnen  Softkeys.  In  den  Zeilen  20  -  80  erhal¬ 
ten  die  Tasten  neue  ASCII-Werte;  die  neuen  Funktionen 
werden  in  den  Zeilen  90  -  150  definiert  Hier  können  Sie 
die  von  Ihnen  favorisierten  Funktionen  einsetzen;  natür¬ 
lich  muß  die  Bildschirmanzeige  (Zeile  200)  entsprechend 
geändert  werden.  Letztere  bleibt  bis  zur  Ausführung  eines 
MODE-Befehls  oder  der  Löschung  des  Windows  #1 
erhalten. 

Listing  3  stellt  Ihnen  die  komfortabelste  Version  der  Tasta¬ 
turbelegung  zur  Verfügung;  diese  wird  im  Betriebssystem 
der  CPCs  abgelegt  und  belegt  die  Softkeys  gleich  doppelt. 
Mittels  Shift-Taste  kann  die  zweite  Funktion  des  jeweili¬ 
gen  Keys  angewählt  werden. 

Die  Neubelegung  der  Tasten  kann  hier  in  den  Zeilen  100  - 
230  geschehen;  die  dazugehörige  Bildschirmausgabe  muß 
in  der  Variablen  a$  stehen  (Zeilen  340  -  370)  und  wird 
dann  vom  Maschinencodeteil  übernommen.  Die  MODE- 
Befehle  sind  allerdings  in  dieser  Version  wirkungslos. 
Achtung!  Der  in  Zeile  430,  Listing  3  enthaltene  NEW- 
Befehl  dient  zum  Löschen  des  Basic-Teils  nach  dem  Able¬ 
gen  der  Maschinenroutine.  Daher  (und  bei  Maschinencode- 
Teilen  sowieso  und  immer)  das  Programm  erst  abspei¬ 
chern,  dann  erst  starten!  (U.  Spiller/ME) 


Die  Hardware 


Sie  benötigen  sieben  Mikrotaster,  im  Fachhandel  als 
"Digitast”  zu  erhalten;  weiterhin  einen  neunpoligen 
Stecker  für  den  Joystickport,  ca.  50  cm  achtpoliges  Flach¬ 
bandkabel  und  eine  Trägerplatte  für  die  Taster  (z.B.  eine 
Lochrasterplatine  mit  2,54  mm  Lochabstand). 

Diese  Teile  werden  dann  nach  Bild  1  zusammengelötet; 
damit  ist  der  Hardwareteil  schon  erledigt  Sie  können  sich 
zusätzlich  ein  Gehäuse  für  die  Softkeys  bauen;  Platinen¬ 
reste  sind  hierzu  bestens  geeignet  Ebenso  ist  eine  Befesti¬ 
gung  der  Taster  per  Doppelklebeband  am  Monitor  oder 
am  Keyboardgehäuse  denkbar. 


Die  Software 


Mit  Listing  1  können  Sie  die  Softkeys  in  eigene  Programme 
einbinden.  In  den  Zeilen  30  -  70  wird  der  Bildschirm  auf¬ 
gebaut;  mit  dem  Wert  der  Variablen  FNskey,  der  in  Zeile  20 
übergeben  wurde  (0  -  7),  können  Sie  per  ON...  GOTO  oder 
ON...  GOSUB  in  den  gewünschten  Programmteil  ver¬ 
zweigen. 

Da  der  Joystickport  auch  einen  Wert  an  den  Tastaturpuf- 


Bies  ist  die  Softkeubelegung  für  das  frogranu  ans  Listing  3.  Bits*  Softkey 
belejung  eignet  sich  sehr  gut  zun  Editieren  und  Erstellen  voi  Prograanen. 
Der  fildschirn  oberhalb  der  Softkegs  steht  *  . 


zur  freien  Verfügung- 


20  UDQ0U  N,  1,80,1. 23 
30  MDiBOU  11,1,80,26,25 


i mal Jiinr.i  Kiwamw  nnrarrra  bimm  eesieeej  whbm  E23SS39I 


50  WINDQV  #1,1,80,25,25  C1010D 

60  x$=CHR$(24>  C1202] 

70  PRIKT#!,”  *’xS"  Eingabe  ”xt"  "xJ.’*  Aend  C8320] 
ern  "x$"  "xS’’  Loeschen  "x$"  "x$”  Sortiere 
n"x$'’  "xS"  Diskette  "x*"  "x$"  Drucken  "x$ 


”  ”x£”  Ende  "xS 

80  OK  FKskey  GOTO  130,140,150,160,170,180,  [2209] 
190 

90  GOTO  80  [3063 

100  REM  Tastaturpuffer  loeschen  [2347] 

110  a$=IKKEY$:  IF  aSO"”  THEK  110  ELSE  RETU  C22223 
RN 

120  REM  Programmteile. . .  C17193 

130  PRINT"Eingabe" : GOTO  80  [1756] 
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140  PR I NT" Aendern" : GOTO  80  [1949] 
150  PRINT"Loeschen”  :  GOTO  80  [2086] 
160  PR INT” Sortieren" : GOTO  80  [1731] 
170  PR INT" Diskette": GOTO  80  [2454] 
180  PR INT" Drucken" : GOTO  80  [2598] 
190  GOSUB  110: MODE  1: END  [1690] 


Listing  2 


10  REM  Softkeys  2:  Funktionstasten 
20  KEY  DEF  72,0,141,141,141 
30  KEY  DEF  73,0,142,142,142 
40  KEY  DEF  74,0,143,143,143 
50  KEY  DEF  75,0,144,144,144 
60  KEY  DEF  76,0,145,145,145 
70  KEY  DEF  77,0,146,146,146 
80  KEY  DEF  78,0.147,147,147 
90  KEY  141, "LIST  " 


[2855] 
[1437] 
[1222] 
[1426] 
[ 1692] 
[1079] 
[1240] 
[1322] 
[898] 


100 

KEY  142, 

” RUN" +CHRS ( 13  > 

[19181 

110 

KEY  143, 

"SAVE" +CHRS (34) 

C2483] 

120 

KEY  144, 

" LOAD" +CHR$  <34 ) 

[1651] 

130 

KEY  145, 

"EDIT  " 

(6111 

140 

KEY  146, 

" AUTO” 

(7531 

150 

KEY  147, 

" CAT" +CHR4 (13) 

C 1213] 

160 

MODE  2 

(5131 

170 

WINDOW  #0, 1, 80, 1, 23 

£1190] 

180 

WINDOW  #1,1,80,25,25 

[1010] 

190 

xS=CHRS<24> 

C 1202] 

200 

PRINT#1 , 

"  ”x*”  LIST  " 

xS"  " xi"  R 

[78141 

UN 

"  x$"  " 

x$"  SAVE  "x$” 

"  xS”  LOAD 

”x$"  "x$" 

EDIT  "x$"  "x$" 

AUTO  "x 

$"  • 

'x$*'  CAT  "x$ 

210 

END 

[110] 

Listing  3 


10  REM  Softkeys  3:  im  Betriebssystem  [3371] 

20  MODE  2: PRINT”bitte  warten..."  [2443] 

30  KEY  DEF  72,0,141,148,255  [1387] 

40  KEY  DEF  73,0,142,149,255  [13111 

50  KEY  DEF  74,0,143,150,255  [1236] 

60  KEY  DEF  75,0,144,151,255  [1785] 

70  KEY  DEF  76,0,145,152,255  [1309] 

80  KEY  DEF  77,0,146,153,255  [1125] 

90  KEY  DEF  78,0,147,154,255  [13061 

100  KEY  141, "LIST  "  [898] 

"EDIT  '*  [11403 

" RUN" +CHRS  <  13  )  t 1259 ] 

”CAT"+CHR$< 13)  [13923 

” SAVE" +CHRS C  34 )  [ 1545  3 

” ! DISC"+CHRS<13)  [22113 

160  KEY  147 , CHR$ (34) +" :  ! ERA, @a$" +CHRS < 13)  [18793 

170  KEY  1 48 , " RENUM” +CHR$ ( 13  )  110503 

"AUTO  "  (10593 

"?FRE<0> ; HIMEM"+CHR$  <  13)  [2340] 

"MODE  1" +CHR$  < 13)  [19883 

"LOAD" +CHRS (34 )  C15663 

" ! TAPE” +CHR$ < 13 )  [ 2500  3 

230  KEY  154,  CHR$  <34 >  +"  :  !  REN,  @n$ ,  @a$”+CHR$  (  [17063 
13) 

240  check=0: FOR  adr=&AF30  TO  &AF8F  E436] 

250  READ  byte:POKE  adr , byte : check=check+by  [31283 
te : NEXT 


110  KEY  142,' 
120  KEY  143, 
130  KEY  144,' 
140  KEY  145, 
150  KEY  146,' 


180  KEY  149, 
190  KEY  150, 
200  KEY  151, 
210  KEY  152, 
220  KEY  153, 


260  DATA  &F3,  &3A,  &C8,  &B1,  &FE, &02, &28, &0C, &  C14703 
3E,  8i04 ,  &CD,  &5A,  &BB,  &3E,  &02 ,  &CD 

270  DATA  &5A,  &BB,  8sl8,  &07,  &21,  &87,  &B2,  &7E,  &  (34913 
A7 , &20 , &25 , &3E , &00 , &CD, &B4 ,  &BB 

280  DATA  &21 ,  &86, SAF, &06 , &05 , &7E, &CD, &5A, &  [26313 
BB,  &23,  &10,  &F9,  &CD,  &6C,  &BB,  &3E 

290  DATA  &01 ,  &CD,  &B4,  &BB,  &21 ,  &8B,  8tAF,  &06,  3»  [32943 
05,  &7E,  &CD,  &5A,  &BB,  &23,  &10,  &F9 

300  DATA  &3E,  &01,  &CD,  &B4,  &BB,  &21,  &90,  &AF,  St  (41413 
CD, &7D, &AF.&FB, &C9.&7E, &23,  &B7 

310  DATA  &C8,  &CD,  &5A,  &BB,  &18,  8tF7,  &1A,  &00,  &  (28923 
4F,  &00,  &16,  &1A,  &00,  &4F,  &17,  &18 

320  IF  checkC >10635  THEN  PRINT"Fehler  in  d  C26183 
en  DATEN" : END 

330  X$=CHR® <24 >  (12023 

340  aS=CHR*  <31 ) +CHRS < 1) +CHR$ ( 1 ) +STRINGS  < 80  [24251 
,  154) 

350  aS=aS+"  "+x$+” 1 ist/renum" +xS+"  "+x$+”  [47093 
edi t/auto" +x$+"  "+x$+”  run/free  " 


360  a$=a*+x$+"  "+xt+"  cat/  cls  "+x$+"  "+xi  (37413 


+"  save/load"+x$+"  "+xS+"  disc/tape" 

370  aS=a$+x$+"  ”+x$+"  era/  ren  "+xS  (18173 

380  FOR  adr=l  TO  LEN(a$>  [9793 

390  POKE  &AF8F+adr, ASC<MID$<aS, adr,  1) )  C1830] 

400  NEXT  [3503 

410  POKE  &AF90+LENCaS) , 0  [3393 
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420  POKE  &BC0E, &C3: POKE  &BC0F, &30: POKE  &BC  [26693 
10 ,  &AF :  MODE  2 

430  NEW  [3183 


Inkey-Routine 
für  464-664-6128 


Wer  hat  sich  noch  nicht  geärgert,  wenn  bei  einem  Input- 
Befehl  durch  falsche  Eingabe  der  Spruch  ”Redo  from  Start” 
auf  dem  Bildschirm  erschien,  und  damit  die  ganze  Bild¬ 
schirmmaske  zerstört  hat? 

Folgende  kleine  Routine  löst  dieses  Problem: 

Zusätzlich  kann  in  den  Zeilen  1 10  -  130  genau  bestimmt 
werden,  welche  Zeichen  angenommen  werden  sollen. 
Dieses  Beispiel  läßt  nur  alle  großen  Buchstaben  zu.  Vor¬ 
sicht  ist  geboten,  wenn  mehrere  Einschränkungen  gemacht 
werden  sollen.  Die  Abfragen  in  den  Zeilen  110- 130  müssen 
dann  in  der  richtigen  Reihenfolge  zueinander  stehen.  Das 
Ganze  muß  also  von  groß  nach  klein  geschachtelt 
werden. 

Die  Anzahl  der  Zeichen  für  die  Eingabe  ist  durch  die 
Zählervariable  z  bestimmt,  und  kann  somit  die  Eingabe  in 
Grenzen  halten.  Zu  ändern  sind  demzufolge  die  Zeilen 
140  und  170. 

Die  Routine  funktioniert  in  allen  drei  Modi,  wobei  das 
Blinken  des  Cursors  im  Modus  2  etwas  schnell  geraten  ist 
Um  das  Blinken  zu  entfernen,  ist  in  der  Zeile  50  die  letzte 
Kombination  von  chr$(32);chr$(8);  zu  streichen. 

Die  ASCII-Werte  für  die  Eingabe  entnehmen  Sie  dem 
Benutzerhandbuch  Anhang  III.2.  Diese  Routine  ist  pro¬ 
blemlos  in  jedes  Programm  einzubauen  und  von  Variablen 
abhängig  zu  machen.  B$  ist  nach  Beendigung  der  Eingabe 
die  Endvariable,  in  der  der  ganze  String  gespeichert  ist. 

(P.  Koehne) 


10  REM -  128631 


20  REM  Inkey-Routine  fuer  Schneider  (37931 

von  P. Koehne 

30  REM -  [2863] 


40  z=0  (3431 

50  A$=INKEY$:IF  A$=""  THEN  PRINT  CHR$(95);  [5067] 
CHR$ ( 8  > ;CHR$ ( 32 ) ;CHR$ (8 ) ; :GOTO  50 

60  IF  ASC( A$ ) =1 3  THEN  RETURN  [1536] 

70  IF  ASC(A$)=32  THEN  140  [13391 

80  IF  ASC(A$)  <>127  THEN  110  [10891 

90  IF  LEN ( B$ )  >=  1  THEN  PRINT  CHR$(32);CHR  153481 
$ (8 ) ;CHR$( 8 ) ;CHR$(95 ) ;CHR$ (8 ) ; 

100  IF  LEN ( B$ )  >=  1  THEN  B$  =LEFT$ ( B$ , LEN ( B  [3167] 
$)-1 ):z=z-1 

110  IF  ASC(A$)  <  65  THEN  50  [1058] 

120  IF  ASC( A$ )  >  90  THEN  50  [18091 

130  REM  (2721 

140  z=z+1  :  IF  z  >1  0  THEN  z=10:GOTO  50  [19701 

150  B$t=B$+A$  [991 

160  PRINT  A$ ;  [4201 

170  IF  z=1 0  THEN  50  [3451 

180  PRINT  CHR$(95J?CHR$(8);  [1462] 

190  GOTO  50  [3841 


Headerlose 
Kassettenoperationen 
für  464-664-6 128 


Um  Programme  mit  dem  Kassettenrekorder  schneller  la¬ 
den  und  abspeichem  zu  können,  hat  man  entweder  die 
Möglichkeit  des  Erhöhens  der  Kassettenübertragungs- 
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rate,  oder  die  des  headerlosen  Abspeicherns.  Da  die  erste 
Möglichkeit  schon  hinlänglich  bekannt  sein  dürfte,  soll 
hier  die  zweite  genauer  erklärt  werden. 

Durch  das  headerlose  Abspeicherformat  entfällt  das  Zer¬ 
legen  in  2K-Blöcke  ganz.  Auf  dem  Band  befindet  sich  nur 
ein  langer  Block,  allerdings  ohne  Namen  und  nur  mit 
einem  Maschinenprogramm  ladbar.  Der  Block  kann  eine 
Länge  von  1  Byte  bis  65536  Bytes  haben,  wobei  eine  Längen¬ 
angabe  von  0  vom  Betriebssystem  als  65536  interpretiert 
wird.  Es  ist  nicht  nötig,  wie  beim  normalen  Speicherfor¬ 
mat  die  Adresse  eines  2K-Pufferspeichers  anzugeben,  weil 
der  File  direkt  ab  der  angegebenen  Adresse  in  den  Spei¬ 
cher  geladen  wird,  ohne  daß  ein  Zwischenspeicher  benö¬ 
tigt  wird.  Diesen  Vorteil  bekommt  der  Basic-Programmie- 
rer  nicht  zu  spüren,  weil  der  2K-Puffer  vom  Basic- 
Interpreter  eingerichtet  wird. 

Mit  folgenden  Firmware-Einsprüngen  ist  es  möglich, 
einen  headerlosen  Kassettenfile  zu  erzeugen,  zu  laden  und 
zu  kontrollieren.  Sie  werden  vom  Basic-Interpreter  bei  Be¬ 
fehlen  wie  "LOAD”,  ”SAVE”,  ”CAT"  und  ”PRINT#9,...” 
angesprungen. 

#BC9E  CAS  WRITE  Satz  auf  Band  schreiben 

#BCA1  CAS  READ  Satz  vom  Band  einiesen 

#BCA4  CAS  CHECK  Satz  mit  angegebenen  Speicher¬ 
abschnitt  vergleichen 
Bevor  man  diese  Firmware-Routinen  anspringt,  müssen 
folgende  Register  geladen  werden: 

HL  =  Startadresse 
DE  =  Länge  des  Files 
A  =  Satzkennzeichen 

Beim  Laden  muß  beachtet  werden,  daß  ein  Satz  nur  dann 
wieder  eingelesen  werden  kann,  wenn  im  Register  A  das 
gleiche  Satzkennzeichen  angegeben  wird  wie  beim 
Abspeichern. 

Es  muß  nicht  ein  ganzer  Satz  eingelesen  werden.  Man 
kann  z.B.  von  500  abgespeicherten  Bytes  auch  nur  50  wie¬ 
der  einiesen,  ohne  daß  ein  Fehler  auftritt.  Es  können  aber 
nur  die  ersten  Bytes  eines  Satzes  geladen  werden,  d.h.  es  ist 
nicht  möglich,  z.B.  die  ersten  5  Bytes  eines  Satzes  zu  über¬ 
springen  und  dann  die  nachfolgenden  einzulesen. 

Wird  versucht,  mehr  Bytes  einzulesen,  als  abgespeichert, 
so  entsteht  ein  Fehler,  das  CARRY-Flag  ist  dann  nicht  ge¬ 
setzt  und  das  Register  A  enthält  den  Fehlerschlüssel. 
Diese  Fehler  können  auftreten: 

A=0  Unterbrechung  durch  ESC  (»Break*)  WRITE/READ/CHECK 
A=1  Geschwindigkeit  zu  hoch  WRITE/READ/CHECK 

A=2  Lesefehler  READ  und  CHECK 

A=3  Unterschied  zum  angegebenen  Speicherabschnitt  nur  CHECK 

Kassettenoperationen  erfordern  genaue  Zeitberücksichti¬ 
gung.  Deshalb  werden  alle  Unterbrechungen  einschließ¬ 
lich  der  Tastaturabfrage  gesperrt.  Es  ist  also  nicht  möglich, 
während  des  Ladevorgangs  Musik  zu  erzeugen,  weil  dafür 
meist  Interrupts  zur  Steuerung  der  Töne  benötigt  werden. 
Der  Abspeichervorgang  kann  nur  durch  Ausschalten  des 
Computers  unterbrochen  werden. 

Im  Vergleich  zum  normalen  Abspeicherformat  ist  das 
headerlose  etwa  doppelt  so  schnell. 

Ein  16K-Bereich  benötigt  mit  einer  Übertragungsrate  von 
3000  Baud: 

normal  95  Sekunden, 
headerlos  45  Sekunden. 

Die  nachfolgende  MC-Routine  stellt  drei  RSX-Befehle 
zur  Verfügung: 

IWRITE 

IREAD 

ICHECK 


Die  Parameter  sind  jeweils: 
Adresse  der  Daten 
Länge  der  Daten 
Satzkennzeichen 


(0  -  65535) 
(0  -  65536) 
(0  -  255) 


Bei  CHECK  sind  folgende  Meldungen  möglich: 
CAS  CHECK:FILE  OK 

File  entspricht  dem  angegebenen  Speicherabschnitt 

CAS  CHECK  ERROR  0 

ESC  wurde  gedrückt 

CAS  CHECK  ERROR  1 

Geschwindigkeit  ist  zu  hoch 

CAS  CHECK  ERROR  2 

Lesefehler 

CAS  CHECK  ERROR  3 

File  entspricht  nicht  dem  angegebenen  Speicherab¬ 
schnitt 


Als  Test  können  Sie  dieses  kurze  Basic-Programm  einge¬ 
ben.  Legen  Sie,  bevor  Sie  das  Programm  starten,  eine  Kas¬ 
sette  ins  Kassettenfach  ein  und  drücken  Sie  dann  REC 
und  PLAY.  Wenn  Sie  das  Programm  starten,  wird  es  auf 
dem  Bildschirm  200  Linien  ziehen  und  dann  auf  eine  Ta¬ 
ste  warten.  Wenn  Sie  eine  Taste  drücken,  wird  der 
Bildschirminhalt  mit  3000  Baud  headerlos  abgespeichert. 
Spulen  Sie  danach  die  Kassette  an  den  Ausgangspunkt 
zurück  und  drücken  Sie  dann  PLAY.  Nach  Zurückspulen 
und  einem  Tastendruck  wird  der  ursprüngliche  Bildschirm¬ 
inhalt  wieder  geladen. 


100  REM 

110  REM  Test  ”1  WRITE”  und  ”IREAD” 

120  REM 

130  MODE  IrBORDER  0:INK  0,0:INK  1,2:INK  2,18:INK  3,6 
140  FOR  k=l  to  200 

150  DRAW  INT(RND*640),  INT(RND*400),INT(RND*3)+1 

160  NEXT  k 

170  CALL  &BB06 

180  IWRITE,&C0OO,&4000,&FF 

190  CLS:CALL  &BB06 

200  IREAD, &C000,&4000,&FF 

210  END  . 

(Eckehart  Roscheisen) 


100  REM 

110  REM  'WRITE' , 'READ'  und  'CHECK'  als  RSX 
120  REM 

130  REM  Parameter  jeweils: 

140  REM  Adresse  der  Daten, Leange  der  Daten 
, Satzkennzeichen 
150  REM 

160  a=40960:e=41168:z=310 
170  MEMORY  a-1 

180  MODE  1: PRINT  TAB(3)"HEX  LOADER  working 
...  please  wait  I 

190  FOR  n=a  TO  e: READ  d$:IF  LEFT$(d$, 1 ) < >" 
&"THEN  220 

200  IF  c <  > VAL  ( d $ ) THEN  PRINT"Checksununenf  eh 
ler  in  Zeile" ;z:END 

210  c=0:d$="":IF  n»e  THEN  270:ELSE  n=n-1:z 
=  z+1 0 :GOTO  260 
220  d$="&"+d$ 

230  POKE  n,VAL(d$ ) :c=c+VAL(d$ ) 

240  LOCATE  17f14:PRINT  USING"##iW ;n; 

250  PRINT  USING"#iW';VAL<d$) 

260  IF  n<e  THEN  NEXT 

270  MODE  2 : PRINT"FORMAT :  SAVE"CHR$ ( 34 ) "RSX 
-W/R/C.BIN"; 

280  PRINT  CHR$(34)",B,";a;",";e-a; 

290  PRINT: PRINT"Einmaliger  Aufruf  mit  'CAL 
L  &A0O0 ' 

300  END 

310  DATA  01 ,0E,A0,21 , 28 , A0 , 3E,C9 , &29F 
320  DATA  32,00,A0,C3,D1 ,BC, 1 9 ,A0 , &3DB 
330  DATA  C3,2C,A0,C3,42,A0,C3,4C,&443 
340  DATA  A0, 57,52, 49, 54,C5,52f  45,8.342 
350  DATA  41 ,C4 ; 43 , 48 , 45 , 43 ,CB, 00 , &2E3 
360  DATA  00, 00,00,00, FE, 03, 20, 3F,&160 


1272] 

[28351 

[272] 

114623 

[5276] 

[272] 
[1512] 
(148  3 
[4818] 

11905] 

[5316] 

[23051 

[308] 

[1925] 

[I960] 

[1270] 

11224] 

[3700] 

[2119] 

[•3370] 

[110  ] 

[1921  } 

[1505] 

[1600] 

[1489] 

[1235] 

[1647] 
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&  Tricks 

370  DATA  CD,7B,AO,E5,F5,3E,OA,21 ,&42B  [20321 

380  DATA  7E, 00 ,  CD, 68 ,BC,F1 ,  El ,C3, &504  [2132] 

390  DATA  9E,BC,FE,03 ,20 ,29 ,CD, 7B,&3EC  [9091 

400  DATA  A0,C3,A1 ,BC,FE,03,20,1F,&400  [2195] 

410  DATA  CD, 7B , A0 ,CD, A4 , BC, 38,12,&45F  [1604] 

420  DATA  F5,21  , A4 , AO ,CD, 72 , AO ,F1 ,&52A  [11521 

430  DATA  C6,30,CD,5A,BB,21 ,C6,A0,&45F  [17261 

440  DATA  18,08,21 ,B5,A0, 18, 03,21 ,&1D2  [13691 

450  DATA  8E,A0,7E,23,CD,5A,BB,B7,&468  [1939] 

460  DATA  20,F8,C9,CD,65,BC,DD,7E,&52A  [15111 

470  DATA  00 ,DD,66 , 05 ,DD, 6E, 04 ,DD, &374  [10621 

480  DATA  56 ,03 ,DD, 5E, 02 ,C9 , 52 , 53 ,&3Q4  [1276] 

490  DATA  58,20,50,61 ,72,61 ,6D, 65, &2CE  [17421 

500  DATA  74,65,72,20,65,72,72,6F,&323  [1650] 

510  DATA  72, OA,OD, 00, 43, 41 ,53,20,4180  [895] 

520  DATA  43, 48, 45, 43, 4B, 20, 45, 52, 4215  [2041 J 

530  DATA  52, 4F, 52, 20, 00, 43, 41, 53, 41 EA  [1029] 

540  DATA  20, 43, 48, 45, 43, 4B,3A, 46, 41  FE  [1490] 

550  DATA  49,4C,45,20,4F,4B,0D,OA,41AB  [14731 

560  DATA  00,00,00,00,00,00,00,00,400  [1044] 


Wohin  mit  Bits  und  Bytes? 
für  464  y 


Basic  und  Maschinencode:  Welche  Möglichkeiten  gibt  es 
zur  Ablage? 

Wo  speichert  man  MC-Programme  am  besten? 


Wenn  man  nicht  nur  Basic  programmiert,  sondern  auch 
in  compilernahen  Programmiersprachen  wie  Assembler, 
Forth  oder  ähnlichem,  dann  stellt  sich  oft  die  Frage,  wo 
man  diese  compilierten  Maschinenspracheprogramme  am 
besten  speichert,  ohne  daß  sehr  viel  Speicherplatz  verloren 
geht,  besonders,  wenn  man  auch  noch  beachten  muß,  daß 
Eventblocks  von  Interrupts  und  RAM-Kernelbytes  von 
Resident  System  Extensions  im  zentralen  RAM  zwischen 
&4000  bis  &BFFF  liegen  müssen,  wo  sie  nicht  von  ROMs 
überdeckt  sind.  Wenn  ein  Programm  noch  dazu  recht  lang 
geworden  ist,  kann  es  schon  kritisch  werden,  so  daß  man 
zum  Beispiel  Programm  und  Daten  trennen  muß.  Was  sind 
schon  64K,  wenn  man  sich  ein  höheres  Ziel  gesetzt  hat? 
Die  Aufgabe  des  nun  folgenden  Beitrages  ist  es.  Ihnen  Al¬ 
ternativen  und  Möglichkeiten  zur  Ablage  Ihrer  compilier¬ 
ten  Programme  aufzuzeigen. 

Voraussetzung  ist  eigentlich  nur,  daß  Sie  einen  Compiler 
haben,  dessen  Code  frei  verschiebbar  ist,  wie  bei  Assem¬ 
bler  mit  ORG  oder  ENT. 


Basic  und  Maschinensprache 
auf  dem  Schneider  CPC  464 


1.  Direkt  über  HIMEM 

Dies  ist  wohl  die  bekannteste  und  am  häufigsten  benutzte 
Möglichkeit,  Maschinenspracheprogramme  abzulegen: 
Quantitativ  gesehen  gibt  dieser  Bereich  natürlich  am  mei¬ 
sten  her,  deshalb  also  besonders  für  lange  Programme,  wie 
größere  Spiele  und  Anwenderprogramme  (Textverarbei¬ 
tungen,  Tabellenkalkulationen,  Dateien  und  so  weiter), 
geeignet. 

Um  diesen  Speicherbereich  zu  schützen,  ändert  man  am 
besten  den  RAM-TOP-Wert  (HIMEM-Wert),  der  entwe¬ 
der  mit  "MEMORY  xxxx”  oder  mit  ”a=xxxx:POKE 
&AE7C,&FF  AND  INT(a)/256:POKE  &AE7B,&FF  AND 
UNT(a)”  gesetzt  wird.  MEMORY  schützt  ein  Maschi¬ 
nenprogramm  vor  "NEW”  und  ”CLEAR”.  Vor  dem 
MEMORY-Befehl  sollte  man  ein  "SYMBOL  AFTER  256” 
einbauen,  weil  es  sonst  danach  bei  einem  "SYMBOL 


Program  m  i  er  er 
gesucht 


Zur  Verstärkung  des  Redaktionsteams  und  im 
Hinblick  auf  mögliche  neue  Publikationen  su¬ 
chen  wir  erfahrene  Programmierer,  die  sich  in 
folgenden  Hochsprachen  auskennen: 

-  Forth  -  C  -  Logo 

-  Fortran  -  Cobol  -  Basic 

-  Pascal  -  Assembler 

Neben  guten  Programmierkenntnissen  ist  ein 
sicherer  Schreibstil  wünschenswert. 

Sollten  Sie  an  einer  freiberuflichen  Tätigkeit  in¬ 
teressiert  sein,  setzen  Sie  sich  direkt  mit  unserem 
Verlag  in  Verbindung. 

DMV  Verlag,  z.H.  Herrn  Ritter, 
Fuldaer  Str.  6,  3440  Eschwege 


Universeller  EPROM-Programmer  4003 
für  Schneider  CPC  464  /  664  /  6128 

B  Programmiert  all«  gängigen  EPROM-Typen  (  2.8.:  2716,-32, 
-64,-128,2508,-16,-32,-64.  .]  ■  Voll  menügesleuerle  Soft¬ 
ware  auf  Kassette  oder  Diskette  ■  Kein  Schalten,  Sleckan 
oder  Löten  nötig  ■  Programmurapannung  wird  im  Qerit 
erzeugt  ■  Verbindung  zum  CPC  über  Flaehbandkabal  und 
Interface-Karle  ■  Gleichzeitiger  Anschluß  dar  Floppy 
möglich  ■  Rote  und  grüne  Leuohtdiode  zur  Bitriebs-Art- 
Anzaiga  ■  Komplett  mit  28  poligem  Teatool-Sockcl  ■ 

B  Fartiggarät  464/664  DM  289,50  ■  Fertiggerät  6128  DM  319,50  B 
Bausatz  mit  Anleitung  für  464/664  DM  239,-  ■  Bauaetz  mit  Anleitung 
für  6128  DM  269,-  ■  Software  auf  3*  Diskette  ♦  DM  15  -  /  auf  5.25'  Diskette  +  DM  5,-« 


EPROM-Karte  2-64  KByte  für  alle  CPC 

■  Wahlweise  bastüekbir  mit  2-64  KByte  EPROM-Kapazi- 
til  ■  Arbeitet  mit  den  EPROM-Typen  2716,-32,-64,-126 

■  Durehgeführter  Erweiterungsbus  (  Floppy  kompatibel  ) 

■  Autostart  von  BASIC-  und/odar  Assembler-Progrim¬ 
men  ■  Komplett  mit  umfangreicher  und  komfortabler 
Software  auf  Kassette  oder  Diskette  *  Gleichermaßen 
für  Profis  und  Einsleiger  geeignet  ■ 

■  Fertiggerät  lür  464/664  DM  249,50  B  Fertiggarit  füi 
6128  DM  259,50  B  Btusalz  mit  Anleitung  für  464/664 
DM  219,50  ■  Biusatz  mit  Anleitung  für  6128  DM  229,50 
*  Softwara  auf  3'  Diskette  +  DM  15,-  ■  Software  auf  5.25‘  Diskette  +  DM  5,-  B 

Speedy  100-80  der  Drucker  für  alle  CPC 

■  100  Zeichen  pro  Sekunde  schnall  ■  FX80  kompatibel 
*  Bis  zu  142  Zeichen  pro  Zeile  ■  Optionaler  Drucker- 
paffer  a  Grafikfähig  ■  Kein  doppelter  Zeileneorschub 

■  Direkt  anschiuBfihig  *  InUraalionale  Zeichensälze 
■  Friktionswalze  und  Traktorentrieb  serienmäßig  ■  Ein¬ 
gebauter  Selbsttest  ■  Bidirektional  Druckweg  optimiert 
■  Optimales  Preis-Leislungsaerhiltnis  * 

■  Komplett  mit  deutschem  und  engl.  Handbuch  DM  739,-  * 
a  Zusätzlicher  Druckerpuffer  ;  2K  DM  25,-  i  4K  DM  50,-  ■ 


Druckerkabel  für  CPC  464/664  DM  35, 


für  CPC  6128  DM  39.- 


*  Softwereengebot  auf  Anfrage 


t  Alle  Artikel  ab  Lager  lieferbar 


DOBBERTlfl 

mOU/TRIE-ELEKTROniK 

BrahmsstraBa  9,  6835  Brühl,  Tel.:  [06202)  71417 
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"""'Tip$  Tricks . . . . . * . . 

AFTER  ”  zu  Komplikationen  (”Improper  argument”) 
kommen  könnte. 

Falls  Programme  Disketten- kompatibel  werden  sollen, 
muß  der  Bereich  von  42747  (&A6FC)  bis  43903  (&AB7F) 
unbelegt  bleiben.  Diesen  Teil  belegt  AMSDOS  mit  Sy¬ 
stemvariablen  und  ähnlichem.  Deshalb  sollte  man  nur 
wenn  es  unbedingt  notwendig  ist,  zum  Beispiel  bei  ent¬ 
sprechender  Länge,  Programme  bis  direkt  unter  den  maxi¬ 
malen  RAMTOP  lagern.  Wenn  Sie  ein  Diskettenlaufwerk 
haben  und  nun  ”PRINT  HIMEM  4T”  eingeben,  und  nicht 
diesen  Wert  erhalten,  brauchen  Sie  sich  nicht  aufzuregen. 
Probieren  Sie  vorher  "SYMBOL  AFTER  256”,  sonst  wer¬ 
den  die  15  Symbole  (ab  240),  die  immer  ins  RAM  kopiert 
werden,  auch  noch  mitberechnet. 

Wenn  das  Programm  selbststartend  ist,  das  heißt,  wenn  es 
keinen  Basic-Lader  benötigt,  kann  es  eine  maximale 
Länge  von  knapp  42K  haben. 

Flexible  Programme  sind  besonders  gefragt,  wenn  es  um 
die  Möglichkeit  des  Verschiebens  geht  Besonderes  Vorbild 
dürften  uns  da  wohl  die  beiden  HISOFT-Geschwister 
GENA  und  MONA  sein,  das  ist  in  dieser  Beziehung  ein 
ganz  heißes  Paar:  Dieses  Paket  mit  Assembler  und  Disas¬ 
sembler  ist  frei  verschiebbar  und  untereinander  kombi¬ 
nierbar. 

2. Unterhalb  des  Basic-Speichers  (LOMEM) 

Der  Speicher  unterhalb  eines  Basic-Speicherbereiches 
stellt  genausoviel  Platz  wie  über  HIMEM  bereit,  seine  Be¬ 
legung  ist  aber  mit  mehr  Aufwand  verbunden. 

Dafür  gibt  es  aber  auch  Vorteile:  SYMBOL-AFTER- 
Probleme  treten  nicht  mehr  auf,  da  "Improper  argument” 
nur  bei  einem  Konflikt  mit  HIMEM  auftritt. 
Speicherplatzbeschränkungen  gibt  es  hier  auch  nicht, 
denn  es  muß  nur  der  Basic-Programmstart  nach  oben  ver¬ 
schoben  werden.  Wie  weit  verschoben  werden  muß,  hängt 
vom  Platzbedarf  an  Basic  ab.  Und  das  geschieht  wie  folgt: 
”a=xxxx  :  POKE  &AE82,&FF  AND  INT(a)/256:POKE 
&AE81,&FF  AND  UNT(a)  :  NEW”,  wobei  für  xxxx  der 
neue  Programmstart  eingesetzt  wefden  muß.  Diese 
Routine  muß  entweder  von  einem  MC-Programm  oder 
aber  im  Direktmodus  (ohne  Zeilennummer)  bewerkstel¬ 
ligt  werden.  Die  Adressen  &AE81  (44673)  und  &AE82 
(44674)  stellen  den  Zeiger  auf  den  Programmstart  von 
Basic-Programmen  dar.  NEW  initialisiert  das  Basic- 
System  neu,  berücksichtigt  aber  jetzt  den  neuen  Speicher¬ 
bereich  (siehe  ROM-Listing  ab  Adresse  &C13E: 
Programm  und  Variablen  löschen). 

Jetzt  kann  ein  binäres  Programm  entweder  unter  Basic 
direkt  geladen  werden,  ohne  einen  Ladefehler  zu  verursa¬ 
chen,  oder  es  kann  direkt  gepoked  werden. 

Basic  kann  trotzdem  ganz  normal  benutzt  werden,  weil 
der  Interpreter  nun  die  neue  Adresse  bei  seinen  Operatio¬ 
nen  berücksichtigt. 

Es  empfiehlt  sich,  das  Programm  erst  ab  368  (&170)  an¬ 
zusiedeln,  weil  der  Bereich  darunter  als  Eingabepuffer  für 
Basic-Programme  und  für  Firmware-Restarts  (RSTs)  be¬ 
nutzt  wird. 

3.  Autostartprogramme 

Falls  Sie  selbststartende  Programme  benutzen,  können 
Sie  den  gesamten  Basic- Speicher  überschreiben  und  brau¬ 
chen  MEMORY  nicht  zu  setzen. 

Selbststartende  Programme  erhält  man  durch  ”SAVE” 
NAME.BIN”, B, Start, länge, einsprung”,  wobei  ”einsprung” 
den  CALL-Befehl  ersetzt  und  somit  den  Basic-Lader.  Eines 
gilt  es  auch  hier  zu  beachten:  Autostartprogramme  können 
nicht  mit  RETum  ans  Basic  zurückkehren.  Falls  Sie  das 
dennoch  wollen,  müssen  Sie  mit  einem  Jump  in  den  Ready- 


Modus  des  geöffneten  (!)  oberen  ROMs  (&C064)  springen. 

4.  Ablage  in  Stringvariablen 

Eine  weitere  Möglichkeit,  Binärfiles  zu  speichern,  ist  die 
Ablage  in  Stringvariablen  als  ASCII-Werte.  Beim  Einlesen 
muß  der  String  jeweils  um  den  CHR$-Wert  des  neuen  By¬ 
tes  erweitert  werden. 

Dann  darf  die  Routine  allerdings  maximal  255  Bytes  lang 
sein,  weil  die  Länge  eines  Strings  immer  in  einem  Byte 
angegeben  wird. 

Die  Adresse  der  Routine  muß  über  den  Klammeraffen 
(Stringdescriptorfunktion)  berechnet  werden,  zum  Bei¬ 
spiel:  ”address=PEEK  (@stringl$+l)+256*  PEEK 
(@stringl$+2):CALL  address”  wenn  ”stringl$”  die  Rou¬ 
tine  enthält. 

"PRINT  PEEK(@stringl$)”  gibt  die  Länge  einer  Variable 
stringlS  aus.  In  unserem  Fall  also  die  Länge  der  Routine  in 
Bytes. 

Die  Aufrufadresse  für  den  ”CALL”-Befehl  sollte  vor  einem 
Aufruf  immer  neu  berechnet  werden,  weil  bei  der 
"Müllsammlung”  (Garbage  Collection)  nicht  mehr  ver¬ 
wendete  Variablen  beseitigt  werden  und  die  aktuellen  auf¬ 
gestockt  werden.  Dadurch  verschiebt  sich  die  Variable,  die 
aufgerufen  werden  soll.  Es  dürfen  also  keine  absoluten 
Sprünge  innerhalb  der  Routine  vorhanden  sein,  was 
schon  allein  durch  die  maximale  Länge  der  Strings  (255) 
ausgeschlossen  wird.  In  solchen  Fällen  muß  man  mit  "JR"s 
und  ”DJNZ”s  auskommen. 

Durch  "CLEAR”  und  "NEW”  wird  diese  Routine  aber  ge¬ 
löscht,  im  Gegensatz  zu  über  HIMEM  gespeicherten 
Programmen,  die  System  resistent  sind. 

5.  Im  Parameterblock  des  Interpreters 

Der  interessanteste  Bereich  ist  wahrscheinlich  der  fol¬ 
gende,  der  wirklich  systemresistent  ist,  weil  er  zum  Bereich 
des  Betriebssystems  gehört.  Das  heißt,  wenn  ein  Reset 
durchgeführt  wird,  wird  ein  Programm,  das  hier  gespei¬ 
chert  ist,  nicht  gelöscht.  Es  kann  nur  noch  durch  Ausschal¬ 
ten  des  Computers  gelöscht  werden. 

Bei  diesem  Bereich  handelt  es  sich  um  den  Parameter¬ 
block  des  Interpreters  (BASIC-STACK),  wo  die  Stapel  von 
GOSUBs,  FOR...NEXTs,  von  WHILE...WENDs,  sowie 
von  EVERYs  und  AFTERs  gespeichert  sind.  Das  ist  ein 
vom  Prozessorstack  separater  512  Bytes  großer  Bereich, 
dessen  Stackpointer  die  Adressen  &B08B  (45195)  und 
&B08C  (45196)  darstellen.  Der  Stapel  kann  maximal  bis 
&B08A  (45194)  anwachsen  im  Gegensatz  zum  internen 
Stapel,  der  von  &C000  nach  unten  wächst. 

Soweit,  bis  &B08A,  wird  er  aber  kaum  kommen.  Probieren 
Sie  einmal  folgendes  Beispielprogramm  aus: 

CALL  0  direkt  eingeben,  dann 

10  GOSUB  30 
20  END 

30  PRINT  i:i=i+l:GOTO  10 

RUN  direkt  eingeben. 

Der  Stapel  läuft  erst  nach  über  80  GOSUBs  ohne  RE¬ 
TURN  über.  Ich  glaube  nicht,  daß  Sie  so  viele  verwenden 
wollen! 

Normalerweise  wird  der  Stapel  eines  GOSUBs  bei  einem 
RETURN  wieder  abgebaut,  genauso  bei  den  Schleifenbe¬ 
fehlen. 

Am  Anfang  zeigt  der  Stackpointer  auf  &AE8C.  Es  wird 
also  kaum  Vorkommen,  daß  der  Stackpointer  einmal  den 
Wert  &AF00  überschreitet,  denn  das  wären  über  110 
Stapeleinträge. 

Bei  einem  Reset  wird  hier  nur  der  Stackpointer  auf  seinen 
Anfangswert  zurückgesetzt,  ohne  den  kompletten  Stack 
selbst  zu  löschen. 
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Tips  &  Tricks 


Nun  probieren  Sie  bitte  einmal  folgendes: 

POKE  &B000,100:CALL  0  direkt  eingeben. 

Und  nun  geben  Sie  nach  dem  Systemreset  weiter. 

PRINT  PEEK(&B000),HEX$(PEEK(&B08B)+256*PEEK 
(&B08C))  ein. 

Der  erste  Wert  muß  nun  immer  noch  100  sein  und  der 
zweite  Ausdruck  den  Stackpointer- Ausgangswert  &AE8C 
enthalten.  Der  gepokede  Wert  wurde  also  nicht  gelöscht, 
nur  der  Stackpointer  wurde  zurückgesetzt. 

Eigentlich  ist  es  keine  Gefahr,  eine  Hilfsroutine  ab  &AF00 
abzuspeichern.  Dennoch  empfiehlt  es  sich,  das  Maschi¬ 
nenprogramm  ganz  oben  anzusiedeln,  so  daß  das  letzte 
Byte  auf  die  Adresse  &B08A  fällt.  Von  &AF00  bis  &B08A 
wären  es  immerhin  394  Bytes. 

6.  In  dem  Bildschirmspeicher 

In  den  acht  Video-RAM-Gaps,  die  nicht  als  Bildschirm¬ 
speicher  benutzt  werden: 

1)  &C7D0-&C7FF  (Gap  1) 

2)  &CFD0-&CFFF  (Gap  2) 

3)  &D7D0-&D7FF  (Gap  3) 

4)  &DFD0-&DFFF  (Gap  4) 

5)  &E7D0-&E7FF  (Gap  5) 

6)  &EFD0-&EFFF  (Gap  6) 

7)  &F7D0-&F7FF  (Gap  7) 

8)  &FFD0-&FFFF  (Gap  8) 

Mit  je  47  Bytes  können  auch  kurze  Routinen  gespeichert 
werden. 

Der  gesamte  Platz  beträgt  immerhin  376  Bytes,  wenn  auch 
nicht  direkt  an  einem  Stück. 

Allerdings  wird  durch  den  Befehl  "MODE”  der  Bereich 
überschrieben,  nicht  aber  durch  ”CLS”. 

Es  ist  also  wenig  sinnvoll,  hier  etwas  unterzubringen,  so¬ 
lange  es  noch  genügend  Platz  hat.  Doqh  zur  Not  wäre  diese 
Lösung  akzeptabel.  Die  Speicherarchitektur  des  Video- 
RAMs  wurde  bereits  in  CPC  International  1 1/85  genau  be¬ 
schrieben.  Deshalb  gehen  wir  darauf  nicht  mehr  genauer 
ein. 

Theoretisch  kann  man  MC-Routinen  auch  direkt  im 
Video-RAM  haben,  nicht  nur  in  den  "Lücken".  Dann  darf 
allerdings  der  Bildschirminhalt  auf  keinen  Fall  zerstört 
werden,  das  wäre  fatal  und  hätte  selbstverständlich  den 
Verlust  der  Daten  zur  Folge.  Es  ist  wohl  sehr  selten  der 
Fall,  daß  man  den  Bildschirm  nicht  benutzt. 

Aber,  wer  weiß... 

7.  In  den  Funktionstastenfeldern  der  Tastatur 

Eine  Möglichkeit,  bei  der  man  kein  MEMORY  braucht, 
ist  das  Funktionszeichenfeld  (Keyboard  buffer  expansion 
table),  dessen  Anfang  durch  den  Zeiger  &B4E1/&B4E2 
(46305/46306)  und  dessen  Ende  durch  &B4E3/&B4E4 
(46307/46308)  markiert  wird. 

Normalerweise  beginnt  diese  Tabelle  bei  &B446  (46150) 
und  ist  rund  150  Bytes  lang. 

Dann  darf  allerdings  der  Zehnerblock  nicht  mehr  mit 
KEY-Sequenzen  belegt  werden.  Dies  verhindert  man  am 
besten  mit: 

10  FOR  i=l  TO  12 
20  FOR  j=l  TO  2 
30  READ  a(j) 

40  NEXT 

50  KEY  DEF  a(l),0,a(2),a(2),a(2) 

60  NEXT 
70  DATA  3,57 
80  DATA  4,54 
90  DATA  5,51 
100  DATA  6,13 


110  DATA  7,46 
120  DATA  10,55 
130  DATA  11,56 
140  DATA  12,53 
150  DATA  13,49 
160  DATA  14,50 
170  DATA  15,48 
180  DATA  20,52 

Mit  der  Belegung  von  der  SHIFT-,  CONTROL-  und  Nor¬ 
malebene  mit  demselben  Zahlenwert  wird  sichergestellt, 
daß  die  jeweilige  Taste  nur  mit  der  Ziffer  belegt  wurde  und 
daß  die  einzelnen  Tasten  keinen  weiteren  Speicher  benöti¬ 
gen.  genauso  bei  ENTER  und  dem  Punkt. 

8.  In  der  RAM-Sprungtabelle 

Diese  Sprungtabelle  von  &BB00  (47872)  bis  &BDF1 
(48625)  enthält  nur  sogenannte  Indirections,  also  jeweils 
einen  3-Byte-Sprung  als  Restart  (RST). 

Wenn  diese  Tabelle  beschrieben  wird,  kann  Basic  aller¬ 
dings  nicht  mehr  arbeiten,  da  der  Interpreter  in  diesem  753 
Bytes  großen  Bereich  hineinspringt  Die  KL-Sprünge 
davor  würde  ich  nicht  belegen,  weil  dorthin  zum  Beispiel 
der  Interrupt-Restart  RST  #27  verzweigt  wird  (&B939). 
Aber  man  kann  den  Bereich  darüber  für  eigenständige 
Routinen  nutzen.  Die  Routinen  selbst  zu  der  Tabelle  fin¬ 
den  sich  im  unteren  ROM  und  können,  falls  benötigt, 
über  einen  Restart  angesprungen  werden.  Aber  Vorsicht! 
Manchmal  springen  auch  diese  unteren  Routinen 
komischerweise  wieder  die  obere  Tabelle  an. 

9.  Belegung  der  User  Restart  (RST  6)  von  &30  bis  &37 
Der  Computer  sieht  hier  einen  Bereich  von  8  Bytes  ab  der 
Adresse  48  (&30)  für  einen  benutzerdefinierten  Restart 
(RST)  vor,  der  mit  "RST  #30”  aufgerufen  werden  kann. 
Hier  können  bestenfalls  minimalste  Routinen  oder  auch 
nur  kleinere  Sprungtabellen  oder  Flagspeicher  eingerich¬ 
tet  werden.  Beim  Einschalten  ist  hier  der  Systemreset  (RST 0) 
belegt. 

MEMORY  MAP:  Die  Speicherarchitektur  des  CPC  464 


i  i 

•  i 

•  • 


Queüenverzeichnis: 

CPC  International  11/85  (Gläserne  CPC:  Video-RAM)  von 
Dipl.Ing.  Henry  Bruhns  -  CPC  Intern  ( 1985),  Data  Becker, 
Düsseldorf,  von  Brückmann,  Englisch,  Gerits  -  CPC 
Firmware  Manual  (1984),  Schneider,  Türkheim,  von 
Bruce  Godden.  (Eckehart  Röscheisen) 
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-  Das  ist  die  Software  zum  CPC  Magazin  - 
-  Jeden  Monat  neu  - 


Inhalt  der  der  Databox  zu  Heft  7/86 


Programm 

Peter' s  Family 

Disk-Nurse 

Software- 

Experiment  1 

Soft-Exper.  2  [464] 

Soft-Exper.  2  [664] 

Inkey-Routine 

Headerless 

Mathefunktionen 

Softkeys 

Vokabel-Trainer 
Basic-Kurs 
Knack  die  Nuß  1+2 
Bonusprogramm 


464 


664 


6128 


•iske 


te. 


Für  alle  CPC’s  als  Kassette  und  3”-Dis 
Auch  als  Abo  erhältlich! 

DATABOX:  -  mehr  als  der  übliche  Softwareservice  \  _ 

DA  TABOX:  -  bringt  ergänzend  sämtliche  Listings  der  jeweiligen  Zeitschrift  und  alle  Programmbeispiele  auf  Kassette 
oder  auf  3”-Diskette. 

DATABOX:  -  Programme  sind,  soweit  systembedingt  möglich,  auf  allen  drei  CPC -Modellen  lauffähig. 

entnehmen  Sie  bitte  der  nebenstehenden  Aufstellung. 

DATABOX:  -  erscheint  jeden  Monat  und  trägt  das  Titelbild  des  gleichzeitig  erscheinenden  Heftes. 

DATABOX:  -  der  Datenträger  zum  Schneider  CPC  International  enthält  außerdem  jedesmal  ein  zusätzliches 
r  ,  Bonusprogramm,  das  nicht  im  Heft  abg^druckt  ist.  ^  ^ 

Einzelbezug:  /  /  |  \  \ 

Einzelbezugspreise  für  DATABOX:  Diskette  3"  24-  DM  zuzüglich  3,-  DM  PortoAerpackung  (im  Ausland  zuzüglich  5,-  DM  Porto/Verpackung) 
Kassette  14,-  DM  zuzüglich  Porto/Verpackung  (im  Ausland  zuzüglich  5,-  DM  Porto/Verpackung). 

Zahlungsweie:  Am  einfachsten  per  Vorkasse  (Verrechnungsscheck)  oder  als  Nachnahme  zuzüglich  der  Nachnahmegebühr  (in  das  Ausland  ist 
Nachnahme  nicht  möglich). ^ ~ Jj 


Schneider  CPC  International 


Postfach  250,  3440  Eschwege 
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STOP  -  Bitte  Bestellkarte  benutzen  - 


\ 


Preisvorteil  durch 
Databox-Abo 


ment  ho/nucn 

außerdt  m  auch 


Databox-Service  kann  ah  sofort  auch  im  Abonne- 
£ogen  werden.  Dadurch  sparen  Sie  Mühe  und  haben 
auch  noch  einen  Preisvorteil  gegenüber  dem  Einzel- 


Das  Databox-Abo  kostet: 

Als  Kassette  für  1/2  Jahr  (6  Lieferungen) 

Im  Inland  und  West-Berlin  40.-  D\I 
Im  europäischen  Ausland  100,-  DM 
Im  außereuropäischen  Ausland  120.-  DM 

Als  Diskette  für  1/2  Jahr  (6  Lieferungen) 

Im  Inland  und  W  est-Berlin  150,-  D\l 
Im  europäischen  Ausland  160,-  DV1 
Im  außereuropäischen  Ausland  180,-  DM 

Als  Kassette  für  I  Jahr  (12  Lieferungen) 

Im  Inland  und  West-Berlin  180.-  DM 
Im  europäischen  Ausland  200,-  DM 
Im  außereuropäischen  Ausland  240.-  DM 
Als  Diskette  für  1  Jahr  ( 12  Lieferungen) 

Im  Inland  und  West-Berlin  300,-  DM 
Im  europäischen  Ausland  320,-  DM 
Im  außereuropäischen  Ausland  360,-  DV1 
ln  den  vorgenannten  Preisen  sind  die  V  ersand-  und 
kosten  enthalten.  Bitte  benutzen  Sie  für  Ihre  Best 
Karte. 


's 


Auch  weiterhin  erhältlich  die  Programm-Highlights  aus  den  ver¬ 
griffenen  Heften  3/85  bis  7/85.  Den  Inhalt  dieser  Kassetten  ent¬ 
nehmen  Sie  bitte  der  folgenden  Aufstellung 

Inhalt  von  Highlights  1 

Spiele:  1.  Smiley  und  die  Grumpies,  2.  Bücherwurm,  3.  Solitaire, 
4.  Reaktionstest.  Tips  &  Tricks:  5.  Restore,  6.  Head  Reader, 
7.  Window.  S.  An  die  Freude,  9.  Orgelstimmer,  10.  Mergefix. 

11.  Notizblatr.  12.  Data  Wandler,  13.  Circle.  Anwendungen: 
14.  3D-Darstellung.  15.  Adressverwaltung.  16.  Screen  Dump. 

Inhalt  von  Highlights  2 

Spiele:  1.  LaserBattle.2.  Partnertest.  Tips  &  Tricks:  3.  Scroller, 
4.  Laufschrift,  5.  Bildschirmbewegungen,  6.  Profile,  7.  Textrou¬ 
tinen.  8.  Baudrate, 9.  Zeitdifferenz,  10.  Dezimalpunkt,  1 1.  Buffer, 

12.  High-Score.  Anwendungen:  13.  Mini  Spreadsheet,  14.  Kur¬ 
vendiskussion,  15.  Vokabelprogramm. 

Viel  Software  zum  günstigen  Preis! 

Databox  Highlights  erhalten  Sie,  ebenso  wie  die  aktuellen 
Databox-Kassetten,  für  14,-  DM/Stück,  zuzüglich  3  -  DM 
Porto  und  Verpackung. 


Tips  &  Tricks 


Erweiterte  Mathefunktionen 


tfur  464-664-6 118 


Zweck  dieses  Programmes  ist  es,  die  mathematischen 
Funktionen  des  CPC  zu  erweitern.  Die  meisten  PC’s  besit¬ 
zen  nämlich  "nur”  eine  begrenzte  Anzahl  von  solchen 
Funktionen.  So  hat  der  CPC  folgende  mathematische 
Rechenmöglichkeiten: 

Die  vier  Grundrechenarten,  Potenz,  SQR,  SIN,  COS, 
TAN,  ATN,  EXP,  LOG,  LOG  10.  (*) 

Dieses  Programm  benutzt  nun  geschickt  die  obigen 
Möglichkeiten,  um  24  neue  Funktionen  zur  Verfügung  zu 
stellen.  Es  handelt  sich  dabei  um  reine  Definitionen. 
Damit  ist  es  möglich,  diese  Funktionen  in  eigene 
Programme  einzubauen,  oder  n ach  Starten  dieses  Listings 
durch  ”PRINT  FN...(X)  <ENTER>”  den  berechneten 
Wert  ausdrucken  zu  lassen. 


Liste  der  Funktionen: 


Name 

Arcus- 

Hyperbel- 

Arcushyperbel  Funktion 

sin  * 

arsin 

sinh 

arsinh 

-Sinus 

cos  * 

arcos 

cosh 

arcosh 

-Cosinus 

tan  * 

atn  * 

tanh 

artanh 

-Tangens 

cot 

arcot 

coth 

arcoth 

-Cotangens 

scc 

arsec 

sech 

arsech 

-Sekans 

CSC 

arcsc 

csch 

arcsch 

-Cosecans 

außerdem  gibt  es  noch  wie  folgt: 
trr  -  3.  Wurzel 
qur  -  4.  Wurzel 

det2  -  Determinante  einer  2  *  2-Matriw 

det3  -  Determinante  einer  3  *  3-Matrix 

Eingabe  der  Matrizen  (Ziffernfolge  =  Reihenfolge  der 

Eingaben) 


Viel  Spaß  beim  Rechnen!  (Armin  Mader) 

10  ’***  Erweiterte  Mathefunktionen  ***  (20051 

20  ’  1117] 

30  ’  Armin  Mader  198  6  181  6] 

50  DEF  FNcot  (x )  =1  / TAN{  x )  [1262] 

60  DEF  FN tr r ( x ) =x * ( 1 / 3 )  [232] 

70  DEF  FNqu r(x)=x“(1/4)  [1191] 

80  DEF  FNsec (x ) =1 /COS( X )  (1447] 

90  DEF  FNCSC  (x )  =1  /  SIN  ( X )  [1322] 

100  DEF  FNarsin(x } =ATN(x/SQR( 1 -x*x)  [1992] 

110  DEF  FNarcos < x ) =-ATN ( x/ SQR ( 1 -x *x ) ) +PI / 2  C2358] 
120  DEF  FNarcot (x ) =Pl/2-ATN ( x )  (19751 


130  DEF  FNarsec(x)=ATN(SQR(x*x-1  ) )  +  (SGN(x)  [2621] 
-1 ) *Pl/2 

140  DEF  FNarcsc (x ) =ATN( 1 /SQR(x*x-1 ) ) +(SGN (  [1630] 
x ) — 1 ) *PI 

150  DEF  FNsinh { x )  =  ( EXP{ x ) -EXP( -x ) ) /2  (1854] 

160  DEF  FNcosh (x) = ( EXP{ x ) +EXP( -x) ) /2  (1362] 

170  DEF  FNtanh (x) =-2 *EXP( -x ) / (EXP< x )+EXP( -  (2809) 
x))  +  1 

180  DEF  FNcoth ( x ) =2  *EXP ( -x ) / ( EXP ( x ) -EXP ( -x  (2179] 
>>  +  1 

190  DEF  FNsech(x) -2/ (EXP(x)+EXP( -x) )  (1484) 

200  DEF  FNcsch (x ) =2/ ( EXP( X ) -EXP{ -x ) )  [1869] 

210  DEF  FNarsinh(x)*LOG(x+SQR(x"x+1 ) )  [2112] 

220  DEF  FNarcosh(x )=LOG(x+SQR(x*x-1 ) )  [2458] 

230  DEF  FNartanh ( x ) =LOG ( ( 1 +x ) / ( 1 -x ) > / 2  [2180] 

240  DEF  FNarcoth { x ) =LOG ( (x+1 )/(x-1 ) )/2  [2511] 

250  DEF  FNarsech (x ) =LOG( 1 +SQR( 1 -x*x) ) /x)  12081) 

260  DEF  FNarcsch (x ) =LOG( (SGN(x) *SQR(x*x+1 )  [3003] 

+1 )/x) 

270  DEF  FNdet2(a,b,c,d) =a*d-b*c  [691] 

280  DEF  FNdet3 (a,b,c,d,e, f ,g,h,i )=a*e*i-a*  [2688] 

f  *h+b  *f  *g-b  *d  •  i+c  *d  *h-c  *e  *g 
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Floppykurs 

Teil  I 


Abbildung  l:Der  "Inhalt”  der  Floppy 


Die  Rechner  der  Schneider  CPC-Serie 
verdanken  ihren  großen  Erfolg  der  Fle¬ 
xibilität,  die  sie  durch  ihre  hervorragen¬ 
den  grafischen  Eigenschaften  und  der 
Möglichkeit,  auf  die  Software  des  be¬ 
kannten  Betriebssystems  CP/M  zuriick- 
zugreifen,  sowohl  dem  professionellen 
Anwender  als  auch  dem  Hobby-Pro¬ 
grammierer  bieten. 

Während  Grafik  und  Geschwindig¬ 
keit  in  der  Hardware  des  Rechners 
begründet  liegen,  wurde  die  Domäne 
CP/M  erst  durch  den  Einsatz  des 
CPC-Floppylaufwerks  erschlossen. 
Anders  als  bei  anderen  Computersy¬ 
stemen  dient  die  CPC-Floppy  nicht 
nur  der  verschneilerten  Datensiche¬ 
rung,  sondern  eröffnet  dem  Anwen¬ 
der  durch  die  Verwendbarkeit  von 
CP/M-Software  völlig  neue  Möglich¬ 
keiten. 

Was  nun  eine  Floppy  überhaupt  ist. 
und  welche  Möglichkeiten  sich  unter 
Ausnutzung  aller  bekannten  und 
noch  versteckten  Eigenschaften  bie¬ 
ten,  soll  dieser  Kurs  vermitteln. 
Grundlage  für  das  Verstehen  der 
Floppy  ist  zunächst  einmal  ein  Ba¬ 
siswissen  über  die  Mechanik  und  die 
Elektronik,  die  einem  solchen  Gerät 
innewohnt. 


Zunächst  einmal  besteht  Ihre  Disket¬ 
tenstation  aus  einem  kleinen  Kasten, 
der  an  die  Rückseite  Ihres  CPCs  ge¬ 
steckt  wird.  Dieser  Kasten,  es  handelt 
sich  dabei  um  den  Controller,  ist  über 
ein  flaches,  graues  Kabel  mit  der 
eigentlichen  Station  verbunden. 
Welche  Aufgaben  der  Controller  hat, 
wird  an  späterer  Stelle  noch  genauer 
erklärt.  Er  bildet  auf  jeden  Fall  das 
”Gehirn,,  Ihrer  Floppy  und  steuert 
die  Mechanik  der  Station. 

Die  Station  besteht  aus  einem  groß¬ 
zügig  dimensionierten  Netzteil  sowie 
der  relativ  kleinen  Diskettenlese- 
Vorrichtung  (siehe  Abb.  1). 

Daß  die  Lesevorrichtung  so  klein  ge¬ 
halten  werden  kann,  ist  ein  Verdienst 
der  ständigen  V erbesseru  ng  der  Com¬ 
putertechnologie.  Noch  vor  wenigen 
Jahren  waren  diese  Lesegeräte  ziem¬ 
lich  unförmige  Kästen  mit  riesigen 
Ausmaßen.  Miniaturisierung  und  neue 
Technologien  ermöglichen  es  heute, 
mit  wesentlich  kleineren  Datenträ¬ 
gern  die  gleiche  Leistung  zu  errei¬ 
chen. 

Die  Diskettengröße,  die  Ihr  DDI-1- 
Laufwerk  lesen  kann,  beträgt  3”.  Seit 
geraumer  Zeit  wird  für  den  CPC  auch 
ein  5  !4"-Laufwerk  angeboten.  Vom 
Grundprinzip  her  ist  die  Arbeits¬ 


weise,  mit  der  die  Disketten  behan¬ 
delt  werden,  jedoch  identisch.  Unter¬ 
schiede  linden  sich  nur  in  der  Bauart 
der  Lesevorrichtungen. 

Eine  solche  Lesevorrichtung  nimmt 
Ihren  Datenträger  über  einen  Schlitz 
an  der  Vorderseite  auf  und  verriegelt 
die  Diskette  über  eine  Mitnehmer¬ 
achse.  Diese  Achse  greift  in  das  Mit¬ 
telloch  des  Datenträgers.  Wie  dieser 
Vorgang  vonstatten  geht,  ist  abhängig 
von  der  Art  der  Diskette.  Das  rein  me¬ 
chanische  Beladen  Ihrer  Station  ist 
ein  Zusammenspiel  zwischen  der 
Aufnahmevorrichtung  der  Station 
und  der  Schutzhülle,  die  den  magne¬ 
tischen  Datenträger  (Abb.  2)  der 
Diskette  umgibt.  Bei  der  3”-Diskette 
ist  diese  sogenannte  Envelope  ein  Ha¬ 
ches  Plastikgehäuse;  bei  der  5  V\'- 
Diskette  ein  flacher  Pappumschlag. 
Der  Ladevorgang  funktioniert  über 
Federzüge,  ähnlich  wie  bei  einem 
Autokassettenrecorder.  Nach  dem 
Arretieren  der  Diskette  kann  der 
eigentliche  Datenträger  über  die  Mit¬ 
telachse  der  Station  gedreht  werden. 
Die  Envelope,  die  nur  einen  Schutz 
des  Trägermaterials  darstellt,  ist  damit 
größtenteils  ihrer  Funktion  entho¬ 
ben.  Beim  3”-Format  wird  beim  Ein¬ 
legen  ein  Schieber  an  der  Seite  der 
Diskette  betätigt,  der  die  Schreib-/ 
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Kurse . 


Leseöffnung  der  Diskette  freigibt. 
Sowohl  beim  5  '/»"-Format  als  auch 
bei  den  3”-Formaten  ist  diese 
Schreib-/Leseöffnung  ein  ovales 
Loch  in  der  Envelope.  In  dieser  Öff¬ 
nung  erkennt  man  den  eigentlichen 
Datenträger.  Dieser  besteht  aus  einer 
Folie,  die  mit  einer  magnetisch  akti¬ 
ven  Substanz  beschichtet  ist  (siehe 
Abb.  3). 

Diese  Scheibe  sollte  niemals  mit  den 
Fingern  berührt  werden  und  möglichst 
gut  geschützt  sein.  Beim  3”-Format  ist 
ein  Schutz  durch  die  Klappenme¬ 
chanik  gegeben. 

5  '/»"-Floppys  erfordern  dagegen  eine 
wesentlich  größere  Aufmerksamkeit 
vom  Anwender  und  die  Gefahr  eines 
Datenverlusts  durch  mechanische  Be¬ 
schädigung  ist  wesentlich  größer. 
Ansonsten  besteht  die  Envelope  noch 
aus  den  Schreibschutzöffnungen,  die 
sich  bei  3"-Disketten  zumeist  in 
Form  eines  Plastikschiebers  an  der 
Frontseite  befinden  und  bei  5  '/»"- 
Disketten  aus  einem  Loch  am  Außen¬ 
rand  der  Diskette  bestehen. 

Diese  Öffnungen  können  durch  Be¬ 
wegen  des  Schiebers  oder  durch 
Überkleben  geöffnet  und  geschlossen 
werden.  Die  Floppystation  erkennt 
über  Lichtschranken,  ob  ein  Schieber 
geöffnet  ist  und  entscheidet,  ob  eine 
Veränderung  des  Disketteninhalts  er¬ 
laubt  werden  kann.  So  kann  die  auf 
dem  Datenträger  enthaltene  Daten¬ 
menge  gegen  unbeabsichtigtes  Löschen 
geschützt  werden.  Außerdem  hat  jede 
Diskette  noch  ein  Indexloch,  auf  des¬ 
sen  Funktion  wir  noch  zurückkom¬ 
men. 

Ist  die  Diskette  nun  eingerastet  und 
es  kommt  ein  Signal  vom  Controller, 
so  beginnt  die  eigentliche  Arbeit  der 
Lesevorrichtungs-Hardware. 

Diese  Hardware  besteht  aus  zwei 
sogenannten  Steppermotoren,  einem 


oder  zwei  Schreib-/Leseköpfen  sowie 
einer  Steuerungselektronik. 

Einer  der  Steppermotoren  (Erklä¬ 
rung  folgt)  ist  mit  der  Mittelachse  der 
Station  verbunden  und  hat  die  Auf¬ 
gabe,  die  Diskette  bzw.  den  Datenträ¬ 
ger  zu-  drehen. 

Der  andere  Motor  betätigt  über  ein 
Gestänge  einen  Schieber,  der  den 
Schreib-/Lesekopf  vertikal  zur  Mittel¬ 
achse  verschieben  kann  (Abb.  4). 

Die  Motoren  heißen  deshalb  Step¬ 
permotoren,  weil  sie  sich  nicht  wie  ge¬ 
wöhnliche  Motoren  einfach  nur  dre¬ 
hen,  sondern  von  der  Floppyhardware 
schrittweise  bewegen  lassen  (STEP  = 
Englisch  -  SCHRITT). 

Der  Schieber,  der  von  Steppermotor  2 
bewegt  wird,  schiebt  den  Schreib-/ 
Lesekopf  entlang  des  ovalen  Loches 
der  Envelope.  Dabei  rotiert  der  Da¬ 
tenträger  noch  um  die  Mittelachse. 
Welchen  Zweck  diese  Bewegung  hat, 
wird  Ihnen  klar,  wenn  wir  im  näch¬ 
sten  Kurs  mit  dem  Aufbau  des  Daten¬ 
trägers  beginnen. 

Noch  komplizierter  als  beim  DDI-1, 
läuft  es  beispielsweise  in  der  Vortex 
5  '/»"-Station  ab.  Hier  muß  der  Motor  2 
nämlich  einen  Schieber  bewegen,  der 
mit  zwei  Schreib-/Leseköpfen  ausge¬ 
stattet  ist.  Über  ein  Relais  kann  hier 
angewählt  werden,  ob  der  obere  oder 
untere  Kopf  von  der  Diskette  lesen 
soll  (Head  Select). 

Durch  dieses  Verfahren  spart  man 
sich  das  Umdrehen  der  Diskette  und 
hat  so  rein  theoretisch  den  doppelten 
Speicherplatz  zur  Verfügung.  Natür¬ 
lich  kann  auch  der  DDI-l-Besitzer 
die  zweite  Seite  seiner  Diskette  nut¬ 
zen.  Aber  es  geht  halt  nicht  ganz  so 
komfortabel.  Das  Verfahren  mit  den 
zwei  Köpfen  nennt  man  übrigens 
Double  Sided  (DS);  das  mit  nur 
einem  Schreib-/Lesekopf  Single  Sided 
(SS). 


Abbildung  2:  Das  Laufwerk  ist  ” geladen  ” 


Zahlreiche  andere  Merkmale  der 
Floppymechanik  beziehen  sich  auf 
verschiedene  Aufzeichnungsformate, 
deren  Sinn  Ihnen  allerdings  erst  klar 
wird,  wenn  Sie  die  grundsätzliche 
Funktion  der  Datenaufzeichnung 
kennenlernen. 

Damit  wäre  schon  nahezu  alles  zur 
Mechanik  Ihrer  Floppystation  ge¬ 
sagt. 

Machen  Sie  sich  nicht  die  Mühe,  den 
geheimnisvollen  Kasten  aufzu¬ 
schrauben;  wie  alle  feinmechanischen 
Dinge  ist  auch  Ihre  Floppystation  ge¬ 
gen  rohe  Gewalt  allergisch. 

Nächsten  Monat  geht  es  weiter  mit 
den  Grundlagen  der  magnetischen 
Datenaufzeichnung  und  der  Be¬ 
antwortung  der  Frage,  wieso  sich  der 
Schreib-/Lesekopf  unbedingt  in 
mehrere  Richtungen  gleichzeitig  be¬ 
wegen  muß.  (TM) 


Abbildung  4:  Die  Laufwerksmechanik 


Schreibschutz¬ 

kerbe 
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Magnetscheibe 


Verstärkungsring 
Spezialreimgungs- 
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Abbildung  3:  Die  Diskette  "seziert”. 
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Wir  setzen  Maßstäbe: 


Für  alle  CPC’s  (464+DDI-1,  664,  6128): 


vortex  Floppy  Disk  System  t-X. 

(Fl -X  (RS)  =  5 Va"  und  MI-X(RS)  =  3  Vi") 

Damit  präsentieren  wir  eine  professionelle  Systemlösung  für  alle 
CPS’s,  welche  schon  ein  3"  Laufwerk  haben,  aber  den  Standard 
brauchen  (5  Za"  bzw.  3  W). 

•  Die  F1-X  (M1-X)  ist  kein  Zweitlaufwerk,  sondern  Ihr  System- 
laufwerk. 

•  Per  Kommando  ”IX”  vertauschen  Sie  nach  Belieben  die  Reihen¬ 
folge  von  3"  und  F1-X  bzw.  M1-X. 

•  Der  Befehl  "ICPM.1”  oder  ”ICPM,2’'  ermöglicht  Ihnen  erstmals 
CPM  aus  beiden  Laufwerken  gleichberechtigt  zu  starten. 

•  Ihr  3"  Laufwerk  und  die  F1-X  (M1-X)  unterscheiden  sich  zwar 
wesentlich  in  Datendichte  und  Datenformat  (180  Kb  zu  708  Kb), 
das  Kopieren  zwischen  beiden  geschieht  jedoch  so  reibungslos 
und  glatt,  als  gäbe  es  diesen  Unterschied  nicht. 

•  Sie  wählen  per  Kommando  zwischen  ”Am$dos”  und  ”VDOS  2.0” 
als  Betriebssystem  -  Sie  verfügen  über  beides  nach  Ihrer  Wahl. 

•  Als  herausragende  Leistung  bietet  Ihnen  VD0S2.0: 

-  128  Directory  Einträge 

-  direkter  relativer  Dateizugriff  unter  Basic. 

16  Dateien  können  gleichzeitig  geöffnet  sein. 

-  ROM  residenter  Monitor  +  Diskeditor 

-  mit  ”1  Format”  formatieren  Sie  direkt  unter  Basic 

-  mit  ”ICode,<var>”  realisieren  Sie  einen  Programmschutz  mit 
persönlichem  Passwort 

-  direkte  Parametereingabe  bei  RSX-Befehlen 
Beispiel:  lERA/Test.Bas” 

statt  wie  bislang  gewohnt:  ”A$=”Test.Bas”,  IEBA,  eA$ 


•  RS  232  wird  benötigt?  Dann  wählen  Sie  die  Fl-XRS  oder  die 
Ml-XRS. 

Ein  kompaktes  RS  232  Modul  ist  bei  diesem  Typ  integriert. 

Sie  können  aber  auch  Ihre  F1-X  nachträglich  damit  ausrüsten. 

•  Übrigens: 

Das  vortex  RS-Modul  ist  voll  Amstrad  Port-kompatibel.  Die 

im  Amsdos  vorhandene  RS-Treibersoftware  arbeitet  sofort. 

•  Einfachste  Montage: 

X-  bzw.  XRS-Modul  und  3"  Controler  werden  einfach  zusammen¬ 
gesteckt. 

Das  Besondere  unserer  neuen  X-Lösung  ist  das 
sogenannte  X  (RS)-Modul  (siehe  Abbildung).  Es 
handelt  sich  dabei  um  unseren  Diskcontroler,  der  um 
all  die  Komponenten  abgemagert  wurde,  welche  im 
Schneider  Controler  schon  gegeben  sind. 

Abbildung:  XRS-Modul 


1  Megabyte  =  758  DM 


Abbildung:  6128  und  Fl -X  Floppy 


Abbildung:  Trickfoto  des  XRS-Moduls  und  des  3"  Schneider  Controlers 


Vortex  X  (RS)-Modul  +  Schneider  Controler  ergibt  die  neue 
Qualität!  Ihr  besonderer  Knackpunkt:  Ihr  Amsdos  +  Logo 
im  3"  Controler  bleiben  Ihnen  vollgültig  erhalten,  unser  Betriebs¬ 
system  mit  seinen  erweiterten  Features  gewinnen  Sie  dazu  und 
damit  die  Fähigkeit,  ein  Megadrive  zu  verwalten. 

Bei  dem  Design  des  X-Konzepts  wurde  schon  alles  vorgesehen 
zum  Betrieb  einer  Standard  RS  232  Schnittstelle.  Zum  Beispiel 
muß  nicht,  wie  sonst  üblich,  ein  weiteres  Netzteil  zugeschaltet 
werden  -  das  im  Laufwerksgehäuse  integrierte  Netzteil  über¬ 
nimmt  die  Versorgung. 

Die  Schnittstelle  selbst  befindet  sich  im  X-Modui,  an  dessen 
Schmalseite  der  RS-Konnektor  austritt.  Eine  an  Kompaktheit  und 
Eleganz  -  so  behaupten  wir  -  kaum  zu  überbietende  Lösung: 

Sie  haben  ein  kombiniertes  RS-Controler  Modul.  Eine  Einheit, 
mechanisch  kompakt  und  stabil. 


Soll  die  Schnittstelle  erst  später  nachgerüstet  werden,  so 
tauschen  wir  Ihr  X-Modul  gegen  ein  XRS-Modul  zum  Differenz¬ 
preis  plus  DM10,-  Bearbeitungsaufwand  um! 

Für  Leute,  denen  noch  16  K  ROM  fehlen:  Im  X-Modul  wird  ein 
256  K  ROM  verwaltet,  128  K  sind  hier  prinzipiell  noch  frei. 

ROM  Adresse  kann  frei  über  Jumper  gewählt  werden. 


Mit  unserem  1-X(RS)-Konzept  bieten  wir  ein  Preis  -  Leistungs¬ 
verhältnis  bei  welchem  wir  mit  Recht  sagen  dürfen: 

Vergleichen  Sie  und  sagen  Sie  uns:  Wer  kann  mehr? 


TmI-X  (3  Vi") . 

F1-X(5V4") . 

...758,-* 

1  M1-XRS  — 

...858,-*  1 

1  F1-XRS  (5V4").... 

...858,-*  1 

|  (XRS-Modul:  auf  Anfrage) 

1 

U  *  unverbindliche  Preisempfehlung 

1 

n  Acntung: 

Bitte  geoen  Sie  bei  Kauf  oder  Bestellung  unbedingt  Ihren  Computertyp  an ! 

Für  soft-  und  hardwaretechnische  Fragen  im  Zusammenhang  mit  unseren  Produkten 
haben  wir  eine  User-Sprechstunde  eingerichtet: 

Montag  +  Donnerstag  von  18  -  21  Uhr  stehen  wir  Ihnen  telefonisch  zur  Verfügung! 
Telefon  (0  71 39}  21  60  und  79  60  sowie  (07 11)  777  55  76 

vortex  Computersysteme  •  Vertriebs  GmbH 

Klingenberg  13  •  7106  Neuenstadt  5 

Telefon  (0  71 39)  21  60  und  79  60  •  Telex  7  28  915  tron  d 


Bericht 


Hurra,  wir  leben  noch! 


Foto  2:  Das  Heidenheimer  Werksgymnasium 

Am  26.  April  ereignete  sich  in  einem 
sowjetischen  Kernkraftwerk  bei  Tscher¬ 
nobyl  ein  Unfall,  der  im  Ausmaß  und  in 
den  Auswirkungen  bis  jetzt  ohneglei¬ 
chen  ist.  Diebei  dieser  unkontrollierten 
Kernreaktion  freigesetzten  radioakti¬ 
ven  Isotope  der  Elemente  Jod,  Cäsium, 
Strontium  (und  einige  mehr)  wurden 
mit  der  Luft  in  alle  Himmelsrichtungen 
getragen.  Auch  in  der  Bundesrepublik 
haben  wir  eine  ordentliche  Portion  die¬ 
ses  Fallouts  abbekommen. 

Die  beruhigenden  Empfehlungen 
des  Sozialministeriums  und  die  Ver¬ 
sicherungen  des  Innenministers,  ein 
solcher  Super-GAU  könne  mit  unse¬ 
ren  Kernkraftwerken  nicht  passieren, 
dürfen  nicht  über  die  Tatsache  hin¬ 
wegtäuschen,  daß  das  (von  Kernwaf¬ 
fentests  erzeugte)  "normale”  radio¬ 
aktive  Potential  um  ein  Vielfaches 
erhöht  wurde.  Kurzfristige  Auswir¬ 
kungen  sind  aufgrund  der  relativ  ge¬ 


Foto  1:  Die  verwendete  Meßanlage 

ringen  Dosen  nicht  zu  befürchten;  je¬ 
doch  erwarten  viele  Mediziner  eine 
starke  Steigerung  der  Rate  an 
Krebserkrankungen  in  den  neunzi¬ 
ger  Jahren.  Der  Aufmerksamkeit 
eines  unserer  Leser  ist  es  zu  verdan¬ 
ken.  daß  wir  Ihnen  Informationen 
über  die  rapide  Steigerung  der  Radio¬ 
aktivität  geben  können. 


Herr  Hirlinger  ist  Physiker  und  lehrt 
an  einem  Werkgymnasium  in  Hei¬ 
denheim  bei  Ulm.  Diese  Schulform 
wurde  in  Baden-Württemberg  1982 
vom  Modell  in  die  Regelform  über¬ 
führt  und  unterscheidet  sich  von  her¬ 
kömmlichen  allgemeinbildenden 
Gymnasien  durch  ein  umfangreiches 
System  praktischer  Kurse.  Im  Rah- 
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Bild  1:  Die  Meßergebnisse  in  der  Grafik 


men  eines  naturwissenschaftlichen 
Kurses  der  Klasse  1 1  führte  Herr  Hir- 
linger  mit  seinen  Schülern  ein 
achtwöchiges  Projekt  "Energieum¬ 
wandlungen  und  Radioaktivität” 
durch.  Seit  fünf  Jahren  konnten  an 
dem  Heidenheimer  Gymnasium  im 
Laufe  dieser  Kurse  Erfahrungen  und 
Daten  über  die  Radioaktivität  in  der 
Umgebung  gesammelt  werden  -  ein 
wichtiger  Faktor,  der  eine  realistische 
Einschätzung  der  Strahlenbelastung 
durch  den  Tschernobyl-Unfall  er¬ 
laubt. 

Die  Meßwerte  wurden  mit  einem 
Geiger-Müller-Zähler  der  Firma  Ge- 
nitron  registriert  und  mit  einem  CPC 
6128.  der  über  ein  von  den  Schülern 
selbst  entwickeltes  und  gebautes 
Interface  mit  dem  Zählrohr  verbun¬ 
den  ist,  ausgewertet  und  gespeichert. 
Der  Zähler  "Mini-Monitor”  liefert 
hierzu  eine  von  der  Intensität  der 
Strahlung  abhängige  Anzahl  von  9V- 
Impulsen  pro  Sekunde.  Im  Interface 
werden  diese  Impulse  auf  den  vom 
Rechner  gebräuchlichen  5V-Pegel 
konvertiert  und  verbreitert,  so  daß  sie 
verlustfrei  vom  Computer  erkannt 
werden.  Über  den  Druckerport  wer¬ 
den  schließlich  die  aufbereiteten 
Impulse  in  den  Rechner  eingelesen 
und  bearbeitet. 

Als  aufgrund  der  Großwetterlage  am 
30.  April  offensichtlich  wurde,  daß  ra¬ 
dioaktiv  verseuchte  Wolken  nach 
Deutschland  getrieben  werden  wür¬ 
den,  reagierte  Herr  Hirlinger  sofort 
und  setzte  die  Meßanlage  in  Betrieb. 
Per  (in  aller  Eile  geschriebenem)  Ba- 
sicprogramm  wurden  die  vom  Zähl¬ 
rohr  eingehenden  Impulse  gesam¬ 
melt  und  im  Abstand  von  fünf  Minu¬ 
ten  abgespeichert.  Mit  einem  weiteren 
Programm  wurden  die  gesammelten 
Daten  grafisch  dargestellt.  Das  Er¬ 
gebnis  der  Messungen  vom  Donners¬ 
tag,  dem  1.  Mai  bis  zum  Montag, 
dem  5.  Mai  1986  (die  Messungen  wur¬ 
den  noch  fortgeführt)  sehen  Sie  als 
Kurve  in  Bild  1. 


So, 4. Mai  Mo, 5. Mai 


Diese  Kurve  zeigt  den  rapiden  An¬ 
stieg  der  Radioaktivität  in  Heiden¬ 
heim;  innerhalb  von  36  Stunden  stieg 
der  Level  um  den  Faktor  2,5.  Natür¬ 
lich  kann  dieser  Wert  keine  repräsen¬ 
tative  Funktion  für  das  Bundesgebiet 
haben;  jedoch  läßt  sich  die  steigende 
Tendenz  der  Strahlenbelastung  ein¬ 
deutig  nachvollziehen.  Die  Kurve 
zeigt  einige  Spitzen  an;  diese  stam¬ 
men  von  kurzzeitig  erhöhten  Werten 
durch  Annäherung  von  Personen  mit 
nach  einem  Spaziergang  auf  Asphalt 
verseuchtem  Schuhwerk  an  das  Meß¬ 
system.  Diese  Erhöhung  der  Luftra¬ 
dioaktivität  im  Bereich  der  Messun¬ 
gen  mag  als  Anhaltspunkt  für  die 
Intensität  des  Fallouts  radioaktiver 
Isotope  auf  dem  Boden  dienen. 

Die  Überschrift  dieses  Artikels  wird 
einige  unter  Ihnen  den  Bezug  zur 
Zielsetzung  dieses  Magazins  vermis¬ 
sen  lassen.  Natürlich  soll  im  Rahmen 
einer  Computerzeitschrift  ein  politi¬ 
sches  Thema  für  das  spezielle  Inte¬ 
resse  der  Leser  nicht  aufbereitet  wer¬ 
den,  jedoch  wollte  ich  Ihnen  diesen 
brisanten  Stoff  (im  wahrsten  Sinne 
des  Wortes)  nicht  unter  der  Über¬ 
schrift  "CPC  mißt  Radioaktivität” 
darbieten.  Die  Bewertung  der  ange¬ 
botenen  Informationen  liegt  bei 


1  DEFINT  a-z 

2  ON  BREAK  GOSUB  10000 
10  REM  radio 

15  CLS 

16  del*15000 
20  ’ 

30  EVERY  del.l  GOSUB  1000 
4.0  OPENOUT  "Radio. dat” 

50  ip=&F500 :  op=&EF00 
60  OUT  op.255:  OUT  op.O 
70  ' 

BO  1 

100  IF  INP( ip) <  >90  THEN  100 
105  DI 

110  n=n  +  l :  LOCATE  40,12:  PRINT  rt; 
120  OUT  op,2SS:  OUT  op,0 
125  EI 

130  GOTO  100 
900  ’ 

1000  REM  zaehlen 
1005  DI 

1010  LOCATE  50,12:  i=i+l 

1030  PRINT  n , i 

1040  PRINT  Pt9.i,n 

1050  n=0 

1060  EI 

1100  RETURN 

1900  ’ 

10000  CLOSEOUT 


Ihnen;  jedoch  meine  ich,  daß  dieses 
von  Herrn  Hirlinger  und  seinen 
Schülern  erstellte  kleine  Zeitdoku¬ 
ment  besser  zur  Meinungsbildung 
geeignet  ist,  als  die  vagen  und  dürfti¬ 
gen  Informationen,  die  über  Rund¬ 
funk  und  Fernsehen  zu  erhalten 
waren. 

Zum  Thema  "Meßwerterfassung  mit 
den  CPC’s”  werde  ich  in  einer  der 
nächsten  Ausgaben  interessierten  Le¬ 
sern  einige  Informationen  zum 
Thema  Zählrohre  geben.  Weiterhin 
können  Sie  (gegen  Rückporto)  nä¬ 
here  Informationen  über  das  Meßsy¬ 
stem  der  Heidenheimer  Schule  erhal¬ 
ten.  Herr  Hirlinger  arbeitet  übrigens 
zur  Zeit  an  einem  Projekt  "Meteoro¬ 
logie”,  wobei  per  Satellitenempfänger 
erhaltene  Funkbilder  auf  Disk  ge¬ 
speichert  und  ausgewertet  werden 
sollen.  Weiterhin  sollen  über  Kurz¬ 
welle  ausgestrahlte,  codierte  Wetter¬ 
meldungen  aufgezeichnet  und  mit 
Hilfe  des  Rechners  zu  einer  aktuellen 
Wetterkarte  verarbeitet  werden.  (ME) 
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Programme 

Beschreibung  zu  Compare 


Welcher  Programmierer  stand  noch  nicht  vor  dem  Prob¬ 
lem,  daß  ein  bestehendes  Programm  modifiziert  wurde 
und  nach  getaner  Arbeit  nun  sämtliche  Änderungen  pro¬ 
tokolliert  werden  müssen. 

In  der  Regel  steht  man  dann  ziemlich  ”auf  dem  Schlauch”. 
Welche  Zeile  ist  noch  "Original”,  in  welcher  Zeile  steckt 
eine  (vielleicht  auch  nur  geringfügige)  Änderung,  welche 
Zeilen  wurden  entfernt,  welche  hinzugefügt??? 

Das  vorliegende  Programm  "Compare”  nimmt  Ihnen 
diese  Sorge  ab.  Es  vergleicht  ein  modifiziertes  Programm 
mit  seinem  Original  und  erstellt  ein  Änderungsprotokoll. 
Einzige  Vorarbeit,  die  Sie  dabei  noch  leisten  müssen,  ist 
das  zu  vergleichende  Originalprogramm  mit  SAVE 
”PGMORG”A  und  die  veränderte  Version  mit  SAVE 
”PGMMOD”A  auf  die  gleiche  Diskette  abzuspeichern. 
Bei  der  Kassettenversion  müssen  Sie  ein  wenig  anders 
vorgehen:  zuerst  zweimal  das  Original  mit  SAVE 
”PGMORG”,A  und  dann  einmal  die  geänderte  Version 
mit  SAVE  ”PGMMOD”A  abspeichem. 

Der  Grund  dafür  ist,  daß  das  Original  auch  zweimal  gele¬ 
sen  wird.  Einmal,  um  festzustellen  aus  wieviel  Zeilen  das 
Original  besteht  und  ein  zweites  Mal,  um  die  Zeilen  in  das 
Array  OP$,  das  nach  dem  ersten  Durchgang  aufgebaut 
wird,  zu  schreiben. 

Hat  Compare  nun  alle  benötigten  Originaldaten,  so  kann 
es  mit  der  eigentlichen  Arbeit  beginnen. 

Die  Datei  PGMMOD  wird  zeilenweise  gelesen  und  jede 
gelesene  Zeile  mit  OP$(X)  verglichen. 

Es  wird  danach  untersucht,  ob  die  Zeilen  absolut  identisch 
sind.  Wurde  die  Option  "Komplett  Protokoll”  im  Menue 


gewählt,  so  werden  diese  Zeilen  mit  ZEILENNUMMER 
=  markiert. 

Wurde  eine  Zeile  gefunden,  die  im  Original  überhaupt 
nicht  enthalten  war,  so  wird  diese  Zeile  komplett  ausgege¬ 
ben.  Der  Ausdruck  kann  wahlweise  über  Monitor  oder 
Drucker  erfolgen. 

Werden  Zeilen  des  Originals  in  der  modifizierten  Version 
überhaupt  nicht  mehr  gefunden,  so  wird  ZEILE  XXX 
WURDE  ENTFERNT  ausgegeben. 

Nach  Ablauf  des  Programms  haben  Sie  eine  übersichtli¬ 
che  Liste  aller  Änderungen.  Mit  Hilfe  der  Liste  kann  ein 
anderer  Anwender  sein  Originalprogramm  recht  einfach 
auf  Vordermann  bringen.  Dazu  muß  er  nur  alle  veränder¬ 
ten  Zeilen  einfügen  bzw.  löschen. 

Neben  der  Option  Komplettprotokoll  hat  man  noch  die 
Möglichkeit,  sich  lediglich  alle  Änderungen  auflisten  zu 
lassen.  Dabei  werden  nur  die  Zeilen  gelistet,  die  hinzuge¬ 
fügt,  gelöscht  oder  modifiziert  wurden. 

Das  Programm  hat  eine  anwenderfreundliche  Menue- 
steuerung  und  erklärt  sich  nach  dem  Start  selbst.  Der  An¬ 
wender  muß  lediglich  darauf  achten,  daß  die  beiden 
ASCII  Dateien  PGMORG  und  PGMMOD  auf  der  Dis¬ 
kette  enthalten  sind.  (H.  Büttner) 

für  464-664-6128  g  g 


1  [1476] 

2  '*  *  [175] 

3  ' •  PROGRAM  COMPARE  by  HEINZ  BUETTNER  •  [31721 

4  '•  *  £175] 

5  1  *  analysiert  modifizierte  Programme  *  14397] 

6  ’*  *  [175] 

7  [1476] 

8  *  [117] 

9  ......................................  [1476] 

10  •***•*•**•  Titelvorspann  ***•••••••  [1872] 

20  '•••••••  und  Initialisierung  ••***•**  [632] 

30  . . [1476] 


40  DEPINT  a~z: INK  0,1:INK  1,24:INK  2,1:INK  [3817] 
3 f 1 5 : BORDER  1 tWIDTH  255 

50  MODE  1: SYMBOL  AFTER  143: SYMBOL  143,0,&F  [4993] 
0 , &F0 , &F0 , &F0 , &F0 , &F0 

60  LOCATE  1,1: PEN  2 : PRINT" PROGRAM" : xof f =0 :  [4600] 
yof f =32:GOSUB  100 

70  LOCATE  1,1: PEN  2:PRINT"COMPARE,,:xoff=54  (3254  ] 
:yoff=180:GOSUB  100 

80  PEN  3 : LOCATE  1,25:PRINT  CHR$(164)"  1986  [3531] 
by  HEINZ  BUETTNER 

90  PEN  1 : PRINT  CHR$(243 ) "  TASTE  "CHR$(243)  [3358] 
:GOTO  150 


100  TAG : PLOT  500,500,3:FOR  x=0  TO  56  [1770] 

110  FOR  y=0  TO  7  [1175] 

120  IF  TEST ( x *2, 399 -y* 2) =2  THEN  MOVE  xoff  +  15191] 
x*1 0 , 399-yof f-y *1 6 : PRINT  CHR$ (143); 

130  NEXT  y,x  [397] 

140  TAGOFF: RETURN  [1224] 

150  a$=INKEY$:IF  a$=""  THEN  150  [1418] 

160  . . . . . .  (14601 

170  •*••••••••*  ANMERKUNGEN  *••**•**•*  [2091] 

180  ’*•••*••********•••**••***•**•***•*•  [1460] 

190  MODE  1  [506] 


200  PRINT"Dieses  Programm  vergleicht  ein  0  [3107] 
RIGINAL-" 

210  PRINT"  mit  einem  modifizierten  PROGR  [3766] 
AMM." 

220  PRINT: PRINT: PRINT: PRINT"  Beide  Program  [5936] 
me  muessen  auf  Disk  oder  " 

230  PRINT" Kassette  als  ASCII-File  gespeich  [5827] 
ert  sein" : PRINT : PRINT 

240  PRINT"  Speichern  Original:  Save"CH  14153] 

R$ { 34 ) "PGMORG"CHR$ ( 34 ) " ,a" 

250  PRINT"  Speichern  Mod.Prog:  Save"CH  [4669] 

R$ ( 34 ) " PGMMOD "CHR$ ( 34 ) " ,a" 

260  PRINT: PRINT: PRINT :PRINT"Bei  Kassette  z  15240] 
uerst  ORIGINAL  speichern  I " 

270  PRINT: PRINT: PRINT: PRINT: PRINT"  ALLE  [4935] 
S  IN  ORDNUNG  ???" 

280  a$=UPPER${ INKEY $ ) : IF  a$=""  THEN  280  [1604] 


I  INI' 
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[18191 


[14601 
[1991  ] 
[1460] 
[3841  ] 


[14101 


[470] 

[8525] 


[1384] 


290  IP  a$="N"  THEN  END  ELSE  IF  a$="J"  THEN 
330  ELSE  280 

300  . •••••••••••••••••••••••• . 

310  . .  PROTOKOLLOPTIONEN  ••*••••• 

320  . . . . . . 

330  MODE  1 : PRINT"  PROTOKOLLOP 
T  I  O  N  E  N" 

340  LOCATE  1f10:PRINT"1  *  KOMPLETTPROTOKOL  [7229] 
L  ERSTELLEN" : LOCATE  1,12:PRINT"2  =  NUR  MOD 
IFI KATIONEN  PROTOKOLLIEREN" 

350  a$»INKEY$:IF  3$=""  THEN  350 
360  IF  a$="1 "  THEN  kpl=»1  : LOCATE  5,10:PRINT  [6439  ] 
CHR  $ ( 2  4 ) ; " KOMPLETTPROTOKOLL  ERSTELLEN" ; CH 
R$( 24 ) :GOTO  390 

370  IF  a$="2"  THEN  kpl*2:LOCATE  5,12:PRINT  [6589] 
CHR$ ( 24 ) ; "NUR  MODIFIKATIONEN  PROTOKOLLIER 
EN" ;CHR$ (24 ) :GOTO  390 
380  GOTO  350 

390  LOCATE  1f14:PRINT  STRINGS ( 40 ,"-"): LOCA 
TE  1,16: PRINT" 1  =  PROTOKOLL  AUF  DRUCKER  AU 
S GEBEN": LOCATE  1,18:PRINT"2  =  PROTOKOLL  AU 
F  MONITOR  AUSGEBEN" 

400  a$=INKEY$:IF  a$=""  THEN  400 
410  IF  a$="1 "  THEN  prt=8: LOCATE  5,16:PRINT  [6480] 
CHR$( 24); "PROTOKOLL  AUF  DRUCKER  AUSGEBEN" 

;CHR$ ( 24 ) :GOTO  440 

420  IF  a$="2"  THEN  prt»0:LOCATE  5,18:PRINT  [48801 
CHR$( 24); "PROTOKOLL  AUF  MONITOR  AUSGEBEN" 

;CHR$ ( 24 ) :GOTO  440 
430  GOTO  400 

440  FOR  del=1  TO  500 :NEXT  del:IF  prt=8  THE  [8850] 
N  MODE  0 : LOCATE  3,11: PRINT" PROTOKOLL AUS GAB 
E": LOCATE  5,14: PRINT "BITTE  WARTEN" 

450  IF  prt=0  THEN  INK  0,26:BORDER  26: INK  1 
, 0 : MODE  1: PRINT"  PROTOKOLLAUS 
GAB  E" : LOCATE  1,5 
460  . . 

470  •**•••*••  HAUPTPROGRAMM  ••••*••••• 

480  . . 

490  ' 

500  . . 

510  ’  ***••  Anzahl  der  Prog ramm zei len  im 
520  'Originalprogramm  ermitteln  •*••»••• 

530 

540  IF  kpl=1  THEN  PRINT#prt , " • • •  KOMPLETTP  (8049] 
ROTOKOLL  •**"  ELSE  IF  kpl=2  THEN  PRINTtfprt 
,"***  PROTOKOLL  UEBER  MODIFIKATIONEN  •••" 

550  PRINT#prt:PRINT#prt 
560  OPENIN  "PGMORG" 

570  WH  ILE  NOT  EOF 

580  anzahl=anzahl+1 :LINE  INPUT  #9,t$ 

590  WEND 
600  CLOSEIN 

610  .................................. 

620  ' »Originalprogramm  als  Datei  laden 

630  . . . . 

640  DIM  op$(anzahl) 

650  OPENIN  "PGMORG” 

660  FOR  lesen=»1  TO  anzahl 
670  LINE  INPUT  #9 ,op$ < lesen ) 

680  NEXT  lesen 
690  CLOSEIN 


[452] 


(47201 


[1460] 
[12181 
11460] 
[117] 
[1460] 
(39091 
[2791  1 
[1460] 


700 

710 

720 

730 

740 


'Modifiziertes  Programm  zeilenweise 
'lesen  und  mit  Original  vergleichen 


12772] 
[684  1 
[1840] 
[2050] 
[390] 
(7521 
[1460] 
(15331 
[14601 
(10601 
1684] 
[963] 
[1493] 
(6401 
[752] 
[1460] 
[2771  ] 
12345} 
[1460] 
[601  1 
(18401 
(1351  ] 
[2022  1 


X=1 : OPENIN  "PGMMOD" 

750  WHILE  NOT  EOF 
760  LINE  INPUT  #9,mp$ 

770  IF  x>anzahl  THEN  x=anzahl 
780  IF  op$(x)=mp$  AND  kpl=2  THEN  x=x+1 :GOT  [3108] 
0  850 

790  IF  op$(x)=mp$  THEN  PRINT#prt,VAL(mp$ ) ; 

"  =":PRINT#prt:x=x+1 :GOTO  850 
800  IF  VAL ( op$ { x ) ) =VAL ( mp$ )  THEN  PRINT#prt 
,mp$:PRINT#prt:x=x+1 :GOTO  850 

810  IF  VAL ( op$ ( x ) ) > VAL ( mp$ )  THEN  PRINTtfprt  (47581 
,mp$ : PRINTflprt :GOTO  850 
820  IF  x=anzahl  THEN  840 

830  IF  VAL(op$ (x) ) <VAL(mp$ )  THEN  PRINTflprt 
, " Zeile" ; VAL ( op$ (x ) ) ; "wurde  entfernt" : PRIN 
T#prt:x=x+1 :GOTO  780 

840  IF  VAL ( op$ ( x ) ) < VAL ( mp$ )  THEN  PRINT# prt 
,mp$ : PRINT#prt :GOTO  850 
850  WEND 
860  CLOSEIN 

870  FOR  complete=x+1  TO  anzahl : PRINT#prt, " 

Zeile" ;VAL(op$ (complete) ) ; "wurde  entfernt" 
:PRINT#prt :NEXT  complete 


[3149] 

(59721 


[2028] 
[6210  ] 


(4101  1 

(3901 

[752] 

[5514] 


Ihr  Partner  für  Schneider  bietet: 


Software  Cm. 

Thing  on  a  Spring  29,95 
Bounder  34,95 
Bomb  Jack  39  — 
Bat  Man  29,95 
Hard  Hat  Mack  29,90 
Movie  29,95 

Strange  Loop  29,90 
The  5th  Axis  39, — 
Swords  and 
Sorcery  29,90 
Eden  Blues  •  39,90 
Music  Maestro  34,90 
Fairlight  39  — 
Winter  Sports 
Winter  Games  39,90 
Colossus  Chess  4.0 
Spindizzy  39,90 
Hanse 

Tau  Ceti  34,90 
Thomahawk  39,90 
Doomsday 

Blues  39,95 

Ping  Pong  34,90 
Rambo  29,90 
Subsunk  9,90 
Vagan  Attack  9,90 
Rock’n  Wrestle  39,90 
Zoids  34,90 

STAR  TEXTER  NEU! 


Disk. 

39,95 

39,95 

59- 

49,90 

49  — 
49, — 
59, — 

49,90 

49.90 

59, — 
59, — 

59.90 
59,— 
69, — 

49.90 

59.90 


49,90 


85- 


Druekar: 

Panasonic  NLQ 1080  898, — 
Panasonic  NLQ  1092  1498, — 
Epson  FX  85  1848, — 

Schneider  DMP  2000  698  — 
Schneider  NLQ  401  748, — 

Druckerkabel  nicht  vergessen! 
Für  jeden  Drucker  49,— 

Unser  Superangebot: 
Schneider  CPC  464  mit  Griln- 
Monltor  und  Floppy  DDI-1 
Komplettprels  NURI  698,— 

Joyce,  Joyce  Plus,  CPC  464,  6128 
Zubehör  und  alle  hier  angebotenen 
Spiele  derzeit  sofort  lieferbar? 
******************** ****** 

Bestellungen  und  Anfragen  an: 
Elektronik  Center,  Wachterstr.  3 
8170  Bad  Tdlz 
Tel.:  08041/41565 

Lieferung  per  NN  (zuz.  Porto) 
oder  Scheck  Vorkasse! 
Versandfrei. 

Bei  Bestellung  von  Computern 
bitte  ich  um  Ihren  Anruf. 

PrelMiiskHnft  sofortl 
Rufen  Sie  noch  honte  an! 


VI DEO- IOOO  S 

Interface  zum  Digitalisieren  von 
Fernselt-  oder  Videobildern  für  den 

CPC  464*6128 

395,-  DM 

•  Auflösung  640  x  200  Pixel 

•  für  TV,  Rekorder  o.  Kamera 

•  2, 4  oder  1 6  Farben 

•  Aufnahmezeit  1/50  sek. 

•  incl.  Kurzfilmerstellung 

Demodisk  3"  gegen  Einsendung  von  15,-  DM  (Schein  o.  V-Scheck);  Info 
gratis.  Versand  p.  NN  oder  im  Fachhandel. 

Ing.  Büro  M.  Fricke,  Neue  Str.  13, 1000  Beilln  37,  Tel.:  030/8015652 
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Pascal 

Kurs 

Teil  3 


Der  letzte  Teil  dieses  Kurses  behandelte 
einige  (Grundlagen  der  Programmie¬ 
rung,  die  Bedeutung  von  Algorithmen 
und  deren  Umsetzung  in  Pascal  sowie 
den  grundsätzlichen  Aufbau  eines  Pas¬ 
cal-Programmes.  Dabei  wurden  die  er¬ 
sten  Regeln  der  Syntax  ^Rechtschrei¬ 
bung)  von  Pascal  sowie  Hinweise  zur 
übersichtlichen  Darstellung  eines  Pas- 
cal-Programmes  gezeigt.  In  diesem 
Teil  sollen  die  grundlegenden  Datenty¬ 
pen,  die  Pascal  zur  Verfügung  stellt, 
vorgestellt  werden. 

Warum?  Nun,  weil  ein  Computer 
bzw.  ein  Programm  für  den  Zweck 
der  Datenverarbeitung  eingesetzt 
wird,  diese  Daten  in  unterschiedli¬ 
chen  "Formen”  (Datentypen)  vorlie¬ 
gen  und  im  Computer  dargestellt  wer¬ 
den.  Mit  diesen  Daten  können  (dür¬ 
fen)  ganz  bestimmte  Operationen 
ausgeführt  werden.  Und  eben  diese 
zwei  Eigenschaften,  der  Datentyp 
und  die  damit  ausführbaren  Opera¬ 
tionen,  bestimmen  im  Endeffekt  die 
Funktionsweise  bzw.  das  "Aussehen" 
eines  Programmes.  Man  kann  also 
nichts  Sinnvolles  programmieren, 
wenn  man  die  zu  verarbeitenden  Da¬ 
ten  nicht  in  die  von  einer  Program¬ 
miersprache  zur  Verfügung  gestellten 
Datentypen  überführen  und  damit 
umgehen  kann. 

Im  Standard-Pascal  nach  N.  Wirth 
gibt  es  vier  grundlegende  Datenty¬ 
pen,  die  als  skalare  Standardtypen 
bezeichnet  werden:  ganze  Zahlen 
(INTEGER),  reelle  Zahlen  (REAL), 
alphanumerische  Zeichen  (CHAR- 
acter)  und  Boolesche  Wahrheitswerte 
(BOOLEAN).  Bei  vielen  späteren 
Implementationen,  wie  z.B.  Turbo- 
Pascal  oder  Pascal/MT-F,  wurde  die¬ 
ser  Vorrat  noch  um  Typen  wie  BYTE, 
LONGINTEGER  (größerer  Werte¬ 
bereich)  oder  STRING  (Zeichenket¬ 
ten)  erweitert.  Hat  man  diese  Daten¬ 
typen  und  die  damit  anwendbaren 
Operationen  verstanden,  so  können 
diese  zu  Ausdrücken  zusammenge¬ 
stellt  und  mit  ihnen  Programman¬ 
weisungen  erstellt  werden. 

Zusätzlich  zu  diesen  "eingebauten” 
(vordefinierten)  Datentypen  kann 
man  in  Pascal  auch  selbst  Datenty¬ 
pen  definieren.  Wie  das  geht,  wird 
etwas  später  behandelt. 


Ganze  Zahlen  (INTEGER) 


Bei  den  ganzen  Zahlen  handelt  es 
sich  um  die  aus  der  Schulzeit  noch 
bekannte  Menge  der  natürlichen,  gan¬ 
zen  Zahlen;  positive  als  auch  nega¬ 
tive.  Von  dieser  läßt  sich  jedoch  auf 
Computern  nur  eine  begrenzte  Teil¬ 
menge  darstellen,  deren  Größe  ab¬ 
hängig  von  der  Anzahl  der  verwende¬ 
ten  Bytes/Bits  ist,  die  zur  internen 
Darstellung  der  Zahlen  im  Computer 
herangezogen  werden.  Der  Wert  der 
kleinsten  bzw.  der  größten  ganzen 
Zahl  hängt  von  dieser  Anzahl  ab  und 
kann  von  Pascal-Implementation  zu 
Pascal-Implementation  unterschied¬ 
lich  sein.  Zur  Bestimmung  dieser 
Werte  gibt  cs  in  Pascal  die  vordefi¬ 
nierte  Konstante  MAXINT  ("maxi- 
mum  Integer”).  Es  können  also  nur 
ganze  Zahlen  im  Bereich  von  -MAX¬ 
INT  und  MAXINT  dargestellt  wer¬ 
den.  Handelt  es  sich  bei  den  zu  verar¬ 
beitenden  Daten  zwar  um  ganze  Zah¬ 
len,  wird  aber  der  für  ganze  Zahlen 
zulässige  Bereich  überschritten,  so 
muß  man  auf  die  reellen  Zahlen  aus- 
weichen,  sofern  die  benutzte  Pascal- 
Version  nicht  den  oben  erwähnten 
Datentyp  LONGINTEGER  kennt. 
Dies  bringt  aber  einige  Nachteile  mit 
sich:  unter  anderem  benötigen  Ope¬ 
rationen  mit  reellen  Zahlen  mehr  Re¬ 
chenzeit  wie  dieselben  mit  ganzen 
Zahlen. 

Hier  ein  paar  Beispiele  für  korrekte 
ganze  Zahlen: 

4711 

0 

-4321 

+100 

MAXINT 

-MAXINT 

Bei  diesen  Zahlen  beschwert  sich  der 
Pascal-Compiler: 

11.22 

123,456 


An  dieser  Stelle  sei  mal  für  die  voll¬ 
kommenen  Neulinge  in  der  Program¬ 
mierung  der  Unterschied  zwischen 
der  deutschen  und  der  amerikani¬ 
schen  Zahlendarstellung  erläutert: 

Wir  verwenden  bei  der  Darstellung 
von  Dezimalzahlen  das  Komma  zur 
Bezeichnung  der  Dezimalgrenze  und 
den  Punkt  zur  Zusammenfassung 
von  Dreiergruppen  bei  großen  Zah¬ 
len.  Die  Amerikaner  handhaben  dies 
genau  umgekehrt.  Und  die  Program¬ 
miersprachen,  eben  auch  Pascal,  tra¬ 
gen  den  amerikanischen  Gewohn¬ 
heiten  Rechnung.  Also  aufpassen! 


Operatoren 


Pascal  erlaubt  für  jeden  Datentyp  nur 
bestimmte,  für  diesen  Typ  auch 
sinnvolle  Operationen,  die  durch  die 
entsprechenden  Operatoren  ge¬ 
kennzeichnet  werden.  Viele  dieser 
Operatoren  sind  aus  der  Mathematik 
bekannt;  wie  z.B.  ”+”  und  Für  an¬ 
dere  werden  wiederum  reservierte 
Worte  benutzt  wie  z.B.  "DIV"  für  die 
Division  ganzer  Zahlen.  Hier  die  für 
ganze  Zahlen  in  Pascal  definierten 
Rechenoperationen: 

+  Addition 

Subtraktion 

*  Multiplikation 

DIV  Division 

MOD  Rest  (modulus) 

Die  ersten  drei  Operatoren  bedürfen 
wohl  keiner  weiteren  Erläuterung. 
Daß  für  die  Division  jedoch  nicht  wie 
auch  in  Basic  der  "/"-Operator  ver¬ 
wendet  wird,  soll  kurz  erklärt  werden: 
Wie  leicht  einzusehen  ist,  hat  die 
Division  einer  ganzen  Zahl  durch 
eine  andere  ganze  Zahl  nicht  unbe¬ 
dingt  eine  ganze  Zahl  als  Ergebnis 
(Bsp.:3/2— 1.5).  Das  Ergebnis  wäre 
also  nicht  mehr  vom  selben  Datentyp 
wie  die  zwei  Operanten.  Deshalb 
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Kurse 


wird  bei  der  Ganzzahl-Division  der 
Divisionsrest  einfach  "abgeschnit¬ 
ten”  was  bei  Basic  automatisch  bei 
der  Division  ganzer  Zahlen  mit  dem 
”/”-Operator  geschieht.  In  Pascal  ist 
dieser  Operator  aber  nur  für  die 
Division  reeller  Zahlen  reserviert;  lie¬ 
fert  also  immer  ein  reellwertiges  Er¬ 
gebnis.  Daher  wurde  der  "DIV"- 
Operator  eingeführt,  der  auch  nur  bei 
der  Ganzzahl-Division  eingesetzt 
werden  darf.  Da  man  sich  aber 
sowieso  über  den  zu  benutzenden  Da¬ 
tentyp  bei  den  auszuführenden  Ope¬ 
rationen  im  klaren  sein  muß,  stellt 
dies  nach  ein  wenig  Praxis  keine 
Schwierigkeiten  mehr  dar. 

Der  ”MOD”-Operator  liefert  den 
Divisionsrest  einer  ganzzahligen 
Division,  z.B.  8  MOD  3  =  2.  Dabei 
gilt:  A  MOD  B  =  A-(A  DIV  B)*B  oder 
für  die  Basic-Kenner:  A  MOD  B  =  A- 
INT(A/B)*B. 

Zusätzlich  zu  den  Rechenoperatio¬ 
nen,  mit  denen  die  Daten  eines  Types 
manipuliert  werden  können,  benötigt 
man  für  eine  sinnvolle  Datenverar¬ 
beitung  auch  Möglichkeiten  des  Ver¬ 
gleiches.  Dazu  existieren  die  Relations¬ 
operatoren  (Vergleichsoperatoren), 
die  ebenfalls  aus  der  Mathematik 
oder  anderen  Programmiersprachen 
bekannt  sind: 

>  größer  als 

>  =  größer  oder  gleich 

<  kleiner  als 

<=  kleiner  oder  gleich 

=  gleich 

<>  ungleich 

Verwendet  werden  können  diese  mit 
allen  skalaren  Standard-Datentypen, 
also  auch  mit  denen,  die  noch  folgen. 
Als  Ergebnis  liefern  sie  den  Boole¬ 
schen  Wahrheitswert  "wahr”  (TRUE), 
wenn  die  Bedingung  erfüllt  ist,  oder 
den  Wert  "falsch”  (FALSE),  wenn  die 
Bedingung  nicht  erfüllt  ist 


Standardfunktionen 


Wie  dem  erfahreneren  Computeran¬ 
wender  schon  bekannt  sein  dürfte, 
sind  die  mathematischen  Symbole/ 
Zeichen  für  Funktionen  wie  die 
Quadratwurzel,  die  Potenzierung 
oder  die  eines  Integrals  nicht  im  Zei¬ 
chensatz  eines  Computers  vorhan¬ 
den.  Aus  diesem  Grund  werden  in 
Programmiersprachen  als  Ersatz 
dafür  mehr  oder  weniger  sinnvolle 
Abkürzungen  verwendet  die  die  Auf¬ 
gaben  der  "Funktionen”  wiederge¬ 
ben.  Diese  Abkürzungen  werden  auch 
Standardbezeichner  genannt:  "Stan¬ 
dard”,  weil  sie  in  jeder  Pascal- 
Implementation  vorhanden  sind;  "Be¬ 


zeichner”  -  na  ja,  weil  sie  die  Funktion 
halt  bezeichnen  (nicht  lachen!!!) 

Im  Gegensatz  zu  den  Operatoren,  die 
ihre  Operanten,  auch  Argumente  ge¬ 
nannt,  links  und  rechts  bzw.  nur  links 
von  sich  vorfinden  (Bsp.:  14-1,  oder 
das  "Plus”  als  unärer  Operator:  4-1), 
also  max.  zwei  Argumente  zu  verar¬ 
beiten  haben,  können  Funktionen 
mit  einem  oder  mehreren  Argumen¬ 
ten  Operationen  durchführen.  In  der 
Regel  sind  ihre  Aufgaben  auch  kom¬ 
plizierter  als  die  der  Operatoren.  In 
Pascal  werden  Funktionen  immer 
durch  ihren  Bezeichner  wiedergege¬ 
ben,  gefolgt  von  den  zu  bearbeiten¬ 
den  Werten.  Diese  Werte,  Funktions¬ 
argumente  genannt,  sind  in  runden 
Klammern  eingeschlossen  und  bei 
mehreren  Argumenten  durch  Kom¬ 
mas  getrennt;  das  Ganze  wird  auch 
als  Parameterliste  bezeichnet.  Wie 
wir  später  noch  sehen  werden  -  bzw. 
war  es  ja  schon  im  letzten  Teil  ange¬ 
deutet  worden  -  kann  man  solche 
Funktionen  auch  selbst  definieren. 
Im  Standard-Pascal  werden  vier 
Funktionen  für  die  ganzen  Zahlen 
bereitgestellt: 

ABS(i) 

Absolutwert  der  ganzen  Zahl  i 

ABS(-l)  ergibt  1 

SQR(i) 

Quadrat  (square)  der  ganzen  Zahl  i 

SQR(2)  ergibt  4 

TRUNC(r) 

ganzzahliger  Anteil  der  reellen  Zahl  r 
(truncate,  abschneiden) 
entspr.  der  INT-Funktion  in  Basic 
TRUNC(5.8)  ergibt  5, 

TRUNC(-5.8)  ergibt -5 
ROUND(r) 

rundet  r  zu  einer  ganzen  Zahl 
(kaufmännische  Rundung) 
ROUND(4.3)  ergibt  4 
ROUND(4.8)  ergibt  5 
ROUND(-4.3)  ergibt  -4 
ROUND(~4.8)  ergibt  -5 


Reelle  Zahlen 


Bei  den  reellen  Zahlen  handelt  es  sich 
in  Pascal,  wie  auch  in  anderen  Pro¬ 
grammiersprachen,  um  die  normalen 


Dezimalzahlen  in  Gleitkommadar¬ 
stellung.  Ebenso  wie  bei  den  ganzen 
Zahlen  ist  auch  bei  reellen  Zahlen 
nur  eine  Teilmenge  im  Computer 
darstellbar,  deren  kleinster  und  größ¬ 
ter  Wert  von  Implementation  zu 
Implementation  unterschiedlich  sein 
kann.  Im  Gegensatz  zu  Basic  muß 
eine  reelle  Zahl  in  Pascal  mit  einem 
Dezimalpunkt  und  mindestens  einer 
Ziffer  links  und  rechts  von  eben  die¬ 
sem  geschrieben  werden.  Bei  vielen 
Implementationen  kann  aber  auch 
die  ganzzahlige  Schreibweise  der 
Zahl  verwendet  werden,  da  eine  sol¬ 
che  bei  Bedarf  vom  Compiler  in  eine 
reelle  Zahl  umgewandelt  wird,  an¬ 
derenfalls  beschwert  sich  der  Compi¬ 
ler. 

Beispiele  für  korrekte  reelle  Zahlen: 

+47.11 

1.0 

-0.5 

50.0 

Ebenso  ist  die  sogenannte  wissen¬ 
schaftliche  oder  Exponentialschreib- 
weise  erlaubt: 

1.0E+3  entspr.  dem  Wert  1000 

Wer  schon  etwas  länger  mit  Compu¬ 
tern  zu  tun  hat,  der  dürfte  die  auftre¬ 
tende  Problematik  bei  der  Verwen¬ 
dung  von  reellen  Zahlen  schon  ken¬ 
nen.  Für  die  Neulinge  auch  hier  noch 
einmal  kurz  die  mit  den  reellen  Zah¬ 
len  verbundenen  Probleme: 

Daß  nur  ein  Teil  der  reellen  Zahlen 
auf  dem  Computer  dargestellt  werden 
kann,  ist  ja  schon  erwähnt  worden. 
Dies  ist  wieder  von  der  für  eine  reelle 
Zahl  vorgesehenen  Speicherplatz¬ 
größe  abhängig.  Auf  die  interne  Dar¬ 
stellung  von  reellen  Zahlen  soll  hier 
nicht  weiter  eingegangen  werden,  je¬ 
doch  bestimmt  diese  die  kleinste 
(MINREAL  bzw.  -MINREAL)  und 
die  größte  (MAXREAL  bzw.  -MAX¬ 
REAL)  darstellbare  reelle  Zahl  sowie 
deren  Genauigkeit  (signifikante  Stel¬ 
len).  Wegen  der  begrenzten  Genauig¬ 
keit  können  reelle  Zahlen  nur  in  die¬ 
sem  geräteabhängigen  Intervall  wie¬ 
dergegeben  werden  (s.  Bild  1). 
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Die  Rechenoperatoren 


Für  die  reellen  Zahlen  existieren 
auch  die  von  den  ganzen  Zahlen 
schon  bekannten  Operatoren  für  die 
Addition,  Subtraktion  und  Multipli¬ 
kation.  Für  die  Division  ist  hier  der 
schon  erwähnte  ”/’'-Operator  zustän¬ 
dig  (DIV  darf  bei  reellen  Zahlen  nicht 
verwendet  werden!). 


Funktionen 


Die  von  den  ganzen  Zahlen  schon  be¬ 
kannten  Funktionen  für  den  Abso¬ 
lutwert  ABS(r)  und  zum  Quadrieren 
SQR(r)  können  ebenso  für  die  reellen 
Zahlen  verwendet  werden.  Dabei  er¬ 
hält  man  das  Ergebnis  auch  wieder 
als  reelle  Zahl.  Folgende  neue  Funktio¬ 
nen  können  zwar  mit  ganzen  und 
reellen  Zahlen  als  Argument  arbei¬ 
ten;  sie  liefern  jedoch  immer  ein 
reellwertiges  Ergebnis! 

SIN(x)  Sinus 

COS(x)  Cosinus 

ARCTAN(x)  Arcustangens 

LN(x)  natürlicher  Logarithmus 
EXP(x)  Exponentialfunktion 

SQRT(x)  Quadratwurzel 


Alphanumerische  Zeichen 


Wenn  man  sich  die  Tastatur  seines 
Computers  betrachtet,  so  bekommt 
man  schon  eine  ziemlich  konkrete 
Vorstellung  von  dem,  was  mit  "alpha¬ 
numerischen  Zeichen”  gemeint  ist: 
alle  auf  dem  Monitor/Drucker  dar¬ 
stellbaren  Zeichen  (A  B  Z  !  ?  1  2  3...). 
Im  Gegensatz  zu  Basic  werden  solche 
Zeichen  in  Pascal  immer  zwischen 
zwei  einfachen  Anführungszeichen 
(Apostroph)  geschrieben:  ’A’  ’B’  ’Z’ 
etc.  Die  interne  Representation  dieser 
Zeichen  ist  sicherlich  geläufig:  sie 
werden  als  numerische  Werte  in  einer 
Codetabelle  dargestellt.  Der  auf 
Mikrocomputern  am  häufigsten  an¬ 
zutreffende  Code  ist  der  ASCII-Code, 


auf  Großrechnern  ist  dagegen  häufi¬ 
ger  der  EBCDIC  (sprich  ”ep-si-dick”) 
anzutreffen.  Die  einzelnen  Zeichen 
unterliegen  dadurch  einer  gewissen 
Ordnung,  so  daß  die  bekannten  Ver¬ 
gleichsoperatoren  auch  auf  diesen 
Datentyp  angewendet  werden  kön¬ 
nen.  Allerdings  muß  man  dabei  be¬ 
achten,  welcher  Code  auf  dem  Rech¬ 
ner  oder  in  der  Pascal-Implementation 
benutzt  wird. 

Daß  man  mit  diesen  Zeichen  keine 
arithmetischen  Operationen  durch¬ 
führen  kann,  sollte  einsichtlich  sein. 
Doch  gibt  es  auch  für  diesen  Daten¬ 
typ  ein  paar  Standardfunktionen: 
ORD(c) 

Ordinalfunktion:  liefert  die  Ordnungs¬ 
zahl  des  Zeichens  c,  d.h.  den  intern 
zugeordneten  Codewert.  In  Basic  er¬ 
ledigt  dies  die  ASC-Funktion. 

CHR(i) 

Zeichenfunktion:  liefert  das  Zeichen 
des  Codewertes.  In  Basic  macht  dies 
die  CHR$-Funktion. 

PRED(c) 

Vorgängerfunktion  (engl,  "predeces- 
sor”):  liefert  das  dem  Zeichen  c  voran¬ 
gehende  Zeichen:  PRED(’B’)  ergibt  ’A' 
SUCC(c) 

Nachfolgerfunktion  (engl,  "successor”): 
liefert  das  dem  Zeichen  c  folgende 
Zeichen:  SUCC(’B’)  ergibt  ’C’ 

Die  beiden  letzteren  Funktionen 
(PRED  und  SÜCC)  gelten  im  Prinzip 
auch  für  alle  anderen  geordneten  Da¬ 
tentypen  wie  ganze  Zahlen  und  den 
Booleschen  Wahrheitswerten  sowie 
für  entsprechende  benutzerdefinierte 
Typen.  Ausnahme:  mit  reellen  Zah¬ 
len  geht’s  nicht! 


Wahr  oder  falsch 


Die  Bezeichnung  "Boolesche  Wahr¬ 
heitswerte”  verdanken  wir  einem  Ma¬ 
thematiker  namens  George  Boole, 
der  sich  mit  den  zwei  Wertstufen 
TRUE  (wahr)  und  FALSE  (falsch) 
näher  befaßt  hat  und  daraus  eine  gan¬ 
ze  Algebratheorie  machte:  die 
Boolesche  Algebra.  Es  handelt  sich 
dabei  um  einen  logischen  Datentyp, 
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der  nur  die  zwei  oben  genannten 
Werte  annehmen  kann.  Ausdrücke, 
die  mit  den  Booleschen  Wahrheits¬ 
werten  arbeiten,  werden  "Boolesche 
Ausdrücke”  genannt,  was  z.B.  bei  der 
Verwendung  von  Vergleichsoperato¬ 
ren  der  Fall  ist  Ein  paar  Beispiele: 

0  =  1  ergibt  FALSE 

5  =  5  ergibt  TRUE 

2  <2.6  ergibt  TRUE 

2.5<  1.7  ergibt  FALSE 

Die  Leser,  die  schon  etwas  Program¬ 
mierpraxis  haben  (Sprache  egal), 
werden  erkennen,  daß  mit  solchen 
oder  ähnlichen  Ausdrücken  der  Ab¬ 
lauf  von  Programmen  gesteuert  wird. 


Und  wieder  Operatoren 

Zu  den  üblichen  Vergleichsoperato¬ 
ren  gibt  es  noch  die  folgenden  logi¬ 
schen  Operatoren: 

AND  logische  UND-Verknüpfung 
OR  logische  ODER-Verknüpfung 
NOT  logische  Negation 

Definiert  werden  diese  drei  Operato¬ 
ren  durch  ihre  Wahrheitstabellen 
(Bild  2).  Bei  der  UND-Verknüpfung 
erhält  man  den  Wert  TRUE  nur 
dann,  wenn  beide  Operanten  den 
Wert  TRUE  besitzen,  ansonsten  er¬ 
hält  man  immer  den  Wert  FALSE. 
Bei  der  ODER-Verknüpfung  erhält 
man  TRUE,  wenn  mindestens  einer 
der  Operanten  den  Wert  TRUE  be¬ 
sitzt  Die  Negation  "dreht”  den  Wert 
des  Operanten  "um”;  aus  TRUE  wird 
FALSE  und  umgekehrt. 


...und  Funktionen 


In  Pascal  gibt  es  ein  paar  Funktionen, 
die  als  Ergebnis  einen  der  beiden 
Wahrheitswerte  liefern.  Ein  paar 
Beispiele: 

ODD(i) 

ergibt  TRUE,  wenn  die  ganze  Zahl  i 
ungerade  ist,  anderenfalls  FALSE. 

EOF(Datei) 

ergibt  TRUE,  wenn  beim  Lesen  aus 
einer  DATEI  das  Ende  selbiger  er¬ 
reicht  wurde. 

Damit  habe  ich  leider  den  mir  für  die¬ 
sen  Kurs  zugestandenen  Platz  in  die¬ 
ser  Ausgabe  schon  voll  und  ganz  aus¬ 
gefüllt  -  so  zwei  bis  drei  Textspalten 
hätte  ich  eigentlich  noch  gut  gebrau¬ 
chen  können. 

Etwas  sehr  trocken  war  es  diesmal 
auch,  aber  so  ist  die  Theorie  leider 
meistens.  Im  nächsten  Teil  wird  es 
dann  aber  wieder  etwas  Pascal  an¬ 
hand  von  Beispielen  geben. 

(MC) 
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Bildl:  Die  Beschaltung  der  Buchsen 

TV  am  €  PC  i 
die  Videobuchse 


. . . . . . . . . . . 

Nachdem  wir  in  Heft  6/86  die  Übertra¬ 
gung  von  Bild  und  Ton  über  die 
SCART-Buchse  vorgestellt  haben, 
wollen  wir  diesmal  die  CPC-User  be¬ 
dienen,  deren  TV-Gerät  über  die 
sechspolige  DIN-Videobuchse  verfügt. 

Falls  Sie  das  im  letzten  Heft  beschrie¬ 
bene  Kabel  schon  nachgebaut  haben, 
können  Sie  den  Adapter  von  der 
achtpoligen  Kupplung  zum  sechspo- 
ligen  Stecker  und  den  3,5mm- 
Klinkenstecker  weiterverwenden. 

Als  weiteres  Material  wird  benötigt: 

-  Ix  sechspolige  DIN-Einbaubuchse 

-  Ix  achtpoliger  DIN-Stecker 

-  Ix  kleines  Kunststoffgehäuse 

-  Ix  Schalter  lx  ein  ^ 

-  lx  LED  5  mm  ^optional 

-  lx  Widerstand  330  Ohm ß 

-  lx  Anschlußclip  f.  9V-Batterie 

-  lx  DIN  AV-Kabel  sechspolig 
(handelsüblich) 

-  1  m  einadr.  abgeschirmtes  Kabel 

-  10cm  einadr.  Schaltdraht 

Bei  häufiger  Benutzung  des  Adapters 
empfiehlt  sich  die  Verwendung  eines 
9V-NC-Akkus,  da  sich  dieser  wieder 
aufladen  läßt. 

LED,  Schalter  und  Widerstand  sind 
nicht  unbedingt  vonnöten,  jedoch  als 
Betriebsanzeige  sinnvoll,  um  an  das 
Ausschalten  des  Gerätes  zu  erin¬ 
nern. 

Die  fertige  Schaltung  wird  mit  dem 
fertigen  DIN-Kabel  an  das  TV  ange¬ 
schlossen;  die  Verbindung  zum 
Rechner  übernimmt  der  oben  er¬ 
wähnte  Adapter  aus  Heft  6/86. 

Die  Batterie  erfüllt  in  dieser  Schal¬ 
tung  folgenden  Zweck:  In  den  mei¬ 
sten  Fällen  wird  an  den  Video- 
Buchsen  der  TV’s  eine  Schaltspan¬ 
nung  von  12V  benötigt.  Der  CPC 
kann  jedoch  nur  5V  zur  Verfügung 
stellen.  Bei  einer  frischen  Batterie  ist 
die  Spannung  von  9V  jedoch  zumeist 
ausreichend,  um  das  Relais  im  TV  an- 
ziehen  zu  lassen. 

Zunächst  werden  die  Bauteile  me¬ 


chanisch  im  Gehäuse  befestigt;  die 
Batterie  kann  mit  doppelseitigem 
Klebeband  an  einer  Gehäusewand 
angepappt  werden.  Nach  dieser  Ar¬ 
beit  schließt  sich  die  Beschaltung  an, 
wobei  Sie  stets  ein  Auge  auf  den 
Schaltplan  werfen  sollten.  Zum  An¬ 
schluß  der  Batterie  dient  der  Schalt¬ 
draht;  die  restlichen  Verbindungen 
müssen  mit  dem  abgeschirmten  Ka¬ 
bel  erfolgen. 

Pin  3  der  sechspoligen  Buchse  nimmt 
alle  Abschirmungen  auf,  ebenso  den 
Minuspol  der  Batterie.  Die  Abschir¬ 
mung  des  Kabels  zu  Pin  8  des 
Steckers  wird  auf  Pin  5  geführt;  die 


Abschirmungen  der  Kabel  an  den 
Pins  6  und  7  werden  mit  dem  Stecker¬ 
gehäuse  verbunden.  Diese  Abschir¬ 
mungen  sind  für  eine  einwandfreie 
Übertragung  unbedingt  notwendig. 
Im  Gegensatz  zu  der  Bauanleitung 
aus  dem  letzten  Heft  werden  Sie  fest¬ 
stellen,  daß  die  Pins  i  bis  4  der 
achtpoligen  Buchse  nicht  mehr  be¬ 
schältet  sind.  Dies  liegt  daran,  daß 
das  FBAS-Signal,  welches  vom  CPC 
erzeugt  wird,  sowohl  die  RGB- 
Signale  als  auch  die  SYNC-Impulse 
enthält.  Der  Adapter  aus  Heft  6/86 
-muß  jedoch  nicht  abgeändert  werden. 

(R.  Nitsche/ME) 


Programmiersprache  COMAL 

Pascal  zu  kompliziert?  Basic  za  "alt”?  Logo  unzuralchand? 
Warum  nicht  gleich  C0MAL-80 

Diese  Sprache  ist  strukturiert,  schnell  und  modern.  Auch  Computerneulinge  können 
schon  nach  14  Tagen  fließend  programmieren. 

COMAL-80  wird  in  verschiedenen  Bundesländern  für  den  Schulunterricht  empfohlen 
und  vielfach  in  Universitäten  eingesetzt: 

Jetzt  auch  für  alte  Schneider  CPC  Computer 

Diskette  COMAL-80  Version  1.83  mit  Handbuch  DM  69  — 

C0MAL-80  Modul  in  Vorbereitung 

C0MAL6RUPPE-DEUTSCNLAND 

Fa.  D.  Balz,  2Z7D  Utanum/Ftihr,  Tal.:  040S3/50Q  Modem  654 


Für  unsere  ständige  Joyce-Rubrik  suchen  wir 
noch 

Programme 
Tips  +  Tricks 

zur  Veröffentlichung.  Honorar  nach 
Vereinbarung. 

Einsendungen  an: 

DMV  Daten  &  Medien  Verlagsges.  mbH, 
Fuldaer  Str.  6,  3440  Eschwege 
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Programme 

Top- Programm  des  Monats 


Peter’s  Family 


Peter’s  Family  ist  ein  superschnelles  Reaktionsspiel  in 
Maschinensprache. 

Sie  steuern  darin  mit  einem  Joystick  die  Figur  Frank,  wel¬ 
che  sich  als  Malermeister  in  Peter’s  Garten  betätigen  muß. 
Alle  Gartenwege  und  Zäune  sollen  neu  gestrichen  wer¬ 
den. 

Dummerweise  sind  auch  Peter’s  Söhne  im  Garten  und  das 
sind  rechte  Rabauken.  Sie  machen  sich  einen  Spaß 
daraus,  durch  den  Garten  zu  rennen  und  Frank,  den  ge¬ 
plagten  Malermeister,  bei  jeder  sich  bietenden  Gelegenheit 
anzurempeln.  Dabei  verschüttet  dieser  jedesmal  seine 
Farbe  und  kann  von  vorn  beginnen. 

Steuern  Sie  Frank  so  geschickt  wie  möglich  von  Level  zu 
Level.  Die  Mauern  werden  dabei  immer  mehr  und  die  Gar¬ 
tenwege  immer  enger. 

Außerdem  erhöht  sich  in  jedem  Level  die  Geschwindigkeit. 
Versuchen  Sie  mit  lediglich  fünf  Anläufen  den  kompletten 
Garten  zu  streichen. 

Tippen  Sie  hierzu  zunächst  den  Basiclader  (Listing  1)  ab 
und  sichern  Sie  ihn  mit  SAVE  ”PSTART”  auf  Ihre  Daten¬ 
kassette  ab.  Danach  können  Sie  den  MC-Lader  (Listing  2) 
eingeben.  Sichern  Sie  diesen,  bevor  Sie  ihn  starten,  auf  eine 
andere  Datenkassette  ab.  Danach  legen  Sie  wieder  die  Kas¬ 
sette  ein,  auf  der  Sie  Listing  1  gesichert  haben  und  starten 
Sie  den  MC-Lader  mit  RUN.  Es  erscheint  eine  Meldung. 
Nach  kurzer  Wartezeit  wird  die  Datei  PF.OBJ  hinter 
Listing  1  geschrieben.  Diskettenbesitzer  brauchen  den 
Datenträger  nicht  zu  wechseln. 

Spulen  Sie  hinterher  zurück  und  geben  Sie  ein:  RUN 
”PSTART”.  Das  Listing  1  lädt  den  MC-Code  automatisch 
nach  und  startet  ihn.  (B.  Morell/TM) 

für  464-664-6 128  g  g 

Listing  1 


1 

2 

>  •• 

[104] 

•  * 

3 

•  •• 

PETE  R'S 

FAMILY 

[2398] 

fuer 

Schneider 

CPC  464  •• 

4 

•  •• 

CAS -VERS ION 

[3579] 

Copyright  by  Bernard  Morel 1 


5  **•  [1043 

*  * 

6  Basic-teil  [1203] 

•  • 

7  »*•  {  PF.OBJ  muss  nachgeladen  werden  3  [2077] 

*  * 

8  ........................................  [2798  ] 


9  '==*==  =  =  *==  ===  =  ====  =  :===  =  =  =  FARBINITI ALIS  [4206] 

IERUNG  . . . . . 

10  MEMORY  Ä3FFF:MODE  1; INK  0,26: INK  1,6: IN  [3185] 
K  2,0: INK  3,26:LOAD  "IPF.OBJ" 

20  1 i f e=  5 : BORDER  26: PAPER  0:PEN  2:CLS  [1410 J 

25  GOSUB  5000:  [972] 

26  '  [117] 


27  LOCATE  15,12: PRINT" PRAESENTIERT" : GOSUB  [3848] 
480 :GOSUB  8000 :GOTO  1000 

30  ’for  1=&A000  to  &A150:?  HEX$(i);"  ";HEX  [2511] 
$(peek(i ) ) , :next 

370  FOR  ii=1  TO  4:FOR  i=1  TO  50  STEP  5: SOU  [4477] 
ND  1 ,1+i,1 :SOUND  2 ,2+i , 1 :NEXT  i,ii 
380  FOR  i=1  TO  15  STEP  0.4: SOUND  1,INT(i»i  [3320] 
■fl  )  ,1  :NEXT  i 

385  FOR  ii=1  TO  4:FOR  i=1  TO  50  STEP  5:SOU  [4477] 

ND  1 ,1+i,1 : SOUND  2 ,2+i , 1 :NEXT  i,ii 

390  FOR  i=1  TO  15  STEP  0.4: SOUND  1,INT(i*i  [3320] 


+  1  ) 

,1 :NEXT 

i 

391 

IF  INKEY ( 76 )=0  THEN  RETURN 

[637] 

400 

SOUND 

1 

,239, 80: SOUND 

2,238,80 

[2036] 

405 

SOUND 

1 

,22 5, 20: SOUND 

2,224,20 

[2125] 

410 

SOUND 

1 

,26 8, 20: SOUND 

2,267,20 

[1855] 

415 

SOUND 

1 

,239,20  .-SOUND 

2,238,20 

[1654  ] 

420 

SOUND 

1 

,301 ,20; SOUND 

2,300,20 

[1856  ] 

425 

SOUND 

1 

,268, 20: SOUND 

2,267,20 

[1855] 

430 

SOUND 

1 

,31 9, 20: SOUND 

2,319,20 

[19301 

435 

SOUND 

1 

,301 ,20: SOUND 

2,300,20 

[1856] 

440 

SOUND 

1 

, 358 , 20 : SOUND 

2,357,20 

[16431 

445 

SOUND 

1 

,26 8, 20: SOUND 

2,267,20 

[1855] 

450 

SOUND 

1 

,31 9, 20: SOUND 

2,318,20 

[1890] 

455 

SOUND 

1 

,301,20: SOUND 

2,300,20 

[1856] 

460 

SOUND 

1 

,358, 20: SOUND 

2,357,20 

[1643] 

465 

SOUND 

1 

,31 9, 20: SOUND 

2,318,20 

[1890] 

470 

SOUND 

1 

,379,20: SOUND 

2,378,20 

[2492] 

475 

RETURN 

[5551 

480 

IF  INKEY ( 76 )=0  THEN  RETURN 

[637] 

483  GOSUB  370 : SOUND  1 ,358,50 : SOUND  2,716,5  [5863] 
5,1 2: SOUND  1 , 31 9 , 50:SOUND  2,638,60,12 
485  SOUND  1 ,268,1 00: SOUND  2 ,536 , 1 00 , 1 2 :FOR  [4209] 
i=1  TO  200 :NEXT 

490  GOSUB  370: SOUND  1 , 358 , 1 50 : SOUND  2,716,  [3080] 
150 


500  RETURN  [555] 

1000  '  [117] 

1050  POKE  «8528,0  [447] 

1110  PAPER  2 : CLS : BORDER  0:INK  3,11  [2119] 

1120  CALL  &9A00 : GOSUB  480  [969] 

1140  IF  PEEK(&B52A)<>0  THEN  lif e=lif e-1 : GO  [1666] 
SUB  3000 

1150  IF  lif e=0  THEN  PAPER  0;GOTO  2000  [1764] 

1160  GOTO  1110  [349] 

2000  BORDER  26:CLS:CALL  &BB03: LOCATE  10,20  [54731 
: PRINT  "Neues  Spiel  [  j/n  ]  ?" 

2010  ein$=INKEY$ : IF  ein$=""  THEN  2010  [1328] 

2020  IF  ein$="j"  OR  ein$="J"  THEN  life=5:G  [18311 
OTO  20 

2025  IF  ein$="n"  OR  ein$="N"  THEN  PEN  0:CL  [9301 
S  :END 

2030  GOTO  2010  [3051 

3000  PAPER  0 : CLS : BORDER  26:INK  3,26  [2406] 

3010  'LOAD  " IPITER.BIN"  DISC-VERSION  [1859] 

3011  GOSUB  5000:'  CAS  -VERSION  [2000] 


3020  IF  lif e=0  THEN  LOCATE  6,12: PRINT"Das  [6360] 
war  Dein  letzter  Versuch  1" jGOTO  3040 
3030  IF  lif e<5  THEN  LOCATE  13,12:PRINT  -li  [2981] 
fe+5;".  Versuch" 

3040  CALL  &BB03 : CALL  &BB1 8 ;CLS : INK  3,11 :BO  [2029] 
RDER  0: RETURN 

5000  CLS : MOVE  1 70 , 300 : la=1 2 :RESTORE  6000:G  [3750] 
OSUB  5500:'  M  ; 1 2 

5010  MOVER  70,20: la=4 :RESTORE  6010: GOSUB  5  [2509] 
500:'  -  ; 4 

5020  MOVER  30 , -20 : la=1 2 :RESTORE  6020:GOSUB  [2303] 
5500:'  S  ; 1 2 

5030  MOVER  50,0:la=4:RESTORE  6030:GOSUB  55  [5379] 
00 : MOVER  1 0 , 1 0: la=4 :GOSUB  5500:'  0  ;8 
5040  MOVER  40,-10: la=1 0 :RESTORE  6040:GOSUB  [4034] 
5500:'  F  ; 1 0 

5050  MOVER  70,0: la=8 :RESTORE  6050;GOSUB  55  [2585] 
00:'  T  ;8 
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Bitte  senden  Sie  mir  folgende  Artikel  aus  dem  □  Mailorder  Angebot  □  Clubangebot 

—  Ich  möchte  weitere  Intormationen  über  den  Data  Media  Computercluo,  ehe  ich  mich  zu  einer  Mitgliedschaft 
entschließe  (2-  DM  in  ßnelrnarken  habe  ich  beigelegt)  Mein  Name  und  meine  Anschrift  lautet: 


Anzahl 

Sitt-Nr.: 

TIM 

Pr»U 

Club-Beitrag 

60-  DM 

•oi»  snmkm  Bim  wi»  Porto  +  Verpackung 

Gesimlbdrif 

3-  DM 

□  Den  vorstehenden  Betrag  bezahle  ich  mittels  des  beigefügten  Verrechnungsschecks 

□  Ich  bitte  um  Lieferung  per  NN,  zuzügl  der  Nachnahmegebühr  (nur  innerhalb  der  BRD) 


Datum  Unterschrift  (bei  Minderjährigen:  Unterschrift  des  gesetzt  Vertreters) 


I 


Datum  Unterschrift  (bei  Minderjährigen  Unterschrift  des  gesetzt  Vertreters] 


CPC-Platlnen- 
und  Hardware-Service 


Ich  bestelle  hiermit  aus  Ihrem  Angebot  gemäß  "Schneider  CPC  International", 
Ausgabe  7/86: 

. Stck.  Basisplatine,  beidseitig  beschichtet,  durchkontaktiert  24,90  DM 

. Stck.  Basisplatine  kompl.  bestückt  u.  geprüft  funktionsfertig  82,90  DM 

. Stck.  Centronics- Platine,  einseitig  beschichtet  17,90  DM 

. Stck.  Centronics- Platine  komplett  bestückt  und  geprüft, 

funktionsfertig  79,90  DM 

. Stck.  Verbindungskabel  zwischen  Basisplatine 

und  CPC  464/664  35,90  DM 

. Stck.  Verbindungskabel  zwischen  Basisplatine  u.  CPC  6128  45,90  DM 

Betrag _ 


+  Porto/Verpackung 

(Porto/Verp  Inland  5,-  0M) 

(Porto/Verp  Ausland 8.- DM)  DM 


Gesamtbetrag 


DM 


□  Diesen  Betrag  bezahle  ich  mittels  des  beigefügten  Verrechnungsschecks. 

□  ich  bitte  um  Lieferung  per  Nachnahme  (nur  innerhalb  der  BRD). 

Bei  Nachnahme  kommt  zum  o.g.  Betrag  noch  die  Nachnahmegebühr  hinzu. 


Datum  Unterschrift  (bei  Minderjährigen  des  gesetzt  Vertreters) 


□  Die  Anzeige  st 
Chiffre-Gebühi 
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»Data  Media  Computerclub« 

Beitrittserklärung 

Ich  möchte  von  den  günstigen  Einkaufsangeboten  des  Data  Media  Com¬ 
puterclubs  Gebrauch  machen  und  beantrage  hiermit  die  Mitgliedschaft  ab 
1 .5.1 986  zunächst  für  ein  Jahr.  Die  Mitgliedschaft  soll  sich  um  jeweils  ein 
weiteres  Jahr  verlängern,  wenn  ich  nicht  3  Monate  vor  Ablauf  des  Zeitrau¬ 
mes  kündige. 

Ich  kann  ab  sofort  aus  dem  Club-Angebot  einkaufen  und  alle  weiteren 
Vorteile  des  Clubs  nutzen.  Der  Clubausweis  wird  mir  nach  Zahlung  des 
Jahresbeitrages  von  60,-  DM  zugesandt. 


Vor-  und  Zuname:  _  _ 

Straße/Haus-Nr :  _ 

Postleitzahl  Wohnort 

Beruf _ 

Geburts¬ 
datum:  _ Telelon 


Damm  1  Unterschrift  (bei  Minderjährigen  Vor-  u  Zuname d,flBS,Veftr.) 


Ich  kann  eine  Woche  nach  Erhalt  der  Mitgliedsbestätigung  diesen  Beitritt 
schriftlich  widerrufen  Oer  Widerruf  ist  zu  richten  an:  Data  Media  GmbH. 
Computerclub,  Ruhralle  55, 4600  Dortmund  Ich  bestätige  durch  meine  2 
Unterschrift,  daß  ich  auf  dieses  Widerrufsrecht  aufmerksam  gemacht  wor¬ 
den  bin 


Datum  2.  Unterschrift  (bei  Minderjährigen:  Vor-  u. Zuname  d  ges  Vertr) 


Software  von  Lesern  -  für  Leser 
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Die  Bezeichnung 
»Goldene  Sieben« 
steht  künftig  für  gute 
Software,  die  von  den  Le¬ 
sern  unserer  Zeitschrift  erstellt 
worden  ist,  und  nicht  als  Listing  im 
Heft  abgedruckt  werden  kann,  da 
hierfür  nur  einbegrenzter  Raum  vorhanden  ist,  und 
Ihre  "Schneider  CPC  International"  kein  reines  Li- 
stingblättchen  sein  soll! 

Jeweils  sieben  tolle  Programme  sind  auf  der 
Kassette  bzw.  Diskette  für  wenig  Geld  enthal 
ten. 

Preise: 

Kassettenversion  20,-  DM 

3"-Diskeftenversion  30,-  DM 

zuzüglich  3,-  DM  Porto/Verpackung 
(Im  Ausland  5,-  DM) 

Bei  Nachnahme  kommt  noch  die 
die  Nachnahmegebühr  hinzu. 

Ihre  Bestellung  richten  Sie  bitte  an: 

DMV  Verlag 
-  Leserservice  - 
Postfach  250 
3440  Eschwege 

Bitte  Bestellkarte 
benutzen! 


Berg  der  Monster 

Grauenerregende  Ungeheuer  ter¬ 
rorisieren  einen  abgelegenen 
Landstrich  in  den  Bergen.  Als 
Lehensherr  dieser  Provinz  bekom¬ 
men  Sie  vom  König  den  Auftrag, 
wieder  Ruhe  und  Ordnung  zu 
schaffen.  Als  Sie  sich  zu  ihrer 
Mission  aufmachen,  werden  Sie 
von  einem  Schneesturm  überrascht. 

Nach  dem  Unwetter  stehen  Sie 
ohne  Ausrüstung  und  Hilfe  alleine 
inmitten  der  Berge. 

Gelingt  es  Ihnen  trotzdem,  Ihren 
Auftrag  zu  erfüllen? 

Poker 

Kartenspieler  hergehört:  wollen  Sie 
ganze  Nächte  durchzocken,  ohne 
Muttis  Haushaltsgeld  zu  verspie¬ 
len?  Bitte  sehr,  unser  Computer¬ 
poker  macht's  möglich.  Gewinnen 
können  Sie  zwar  nichts,  aber  trai¬ 
nieren  läßt  sich  mit  diesem  Spiel 
umso  besser. 

Super  Chance 

Verwandeln  Sie  Ihren  CPC  in  einen 
einarmigen  Banditen.  Mit  dieser 
Spielhallensimulation  holen  Sie 
sich  ein  Stück  Las  Vegas  in  Ihr 
Wohnzimmer.  Mit  Jackpot  und 
Superchance. 

Captoin  Storships  Test 
Begleiten  Sie  Captain  Starlight 
auf  seiner  Weltraumexpedition. 

Doch  zuerst  müssen  Sie  beweisen, 
daß  Sie  die  notwendigen  Quali¬ 
täten  mitbringen.  Ein  kniffeliger 
Intelligenz-  und  Reaktionstest  steht 
Ihnen  bevor.  Sind  Sie  in  der  Lage 
zu  bestehen? 

Oi!  Willi 

Sie  sind  der  nette  Heizölhändler, 
der  alle  Bewohner  seines  Stadtvier¬ 
tels  mit  Heizöl  versorgt.  Aber  die 
meisten  Bestellungen  sind  sehr  eilig 
Und  wenn  Sie  nicht  schnell  genug 
liefern,  so  bestellen  sich  die  Leute 
ihr  Öl  eben  anderswo.  Da  kann 
man  schon  ganz  schön  ins  Schwit¬ 
zen  geraten. 


OIE  GOLDENE  M 


Schatz 

Als  Hubschrauberpilot  für  besonders  brenzlige  Einsätze  bekommen  Sie  den  Auftrag,  durch  ein 
verzwicktes  Höhlensystem  bis  zu  einem  legendären  Schatz  vorzudringen  und  mit  diesem  wieder 
heil  zurückzukehren. 

Aber  Vorsicht  ist  geboten,  der  Schatz  ist  schwer  und  die  Höhlen  verwinkelt  und  eng. 

Garten  Manager 

Als  Gärtner  hat  man  es  nicht  leicht.  Versorgen  Sie  das  Grünzeug  in  Ihrem  Garten  richtig,  dann  kann 
gar  nichts  passieren.  Abgesehen  davon,  daß  Sie  überall  das  Unkraut  jäten  und  die  Blumen  gießen 
müssen,  geht  fast  alles  wie  von  selbst. 

Doch  das  Unkraut  wuchert  wie  wild  und  die  Blumen  brauchen  immermehrWasser.  Haben  Sie  einen 
grünen  Daumen? 


Auch  weiterhin  ist  die  "Goldene  7"  Nr.  1  mit  den  Programmen  Secret  of  Wizard, 
r  Turlen,  Zodora,  3-D  Labyrinth,  Die  alte  Burg,  Space- Race  und  Galaxis  erhältlich. 

®  Bitte  benutzen  Sie  die  Bestellkarte! 


hihihi 
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IM  lllll  m  Hl 


. Programme"' 

5060  MOVE  5,120: la=6 :REST0RE  6060:GOSUB  55  [6198] 
OOrMOVER  10,30: la=4 :GOSUB  5500:'  P;10 
5070  MOVER  40,-30 : la  =  1 2:RESTORE  6070:GOSÜB  [2265] 
5500: 1  E  ; 1 2 

5072  MOVER  70,0: la=8 :RESTORE  6050:GOSUB  55  [2585] 
00:*  T  ; 8 

5073  MOVER  40,0:  la=1 2  :RESTORE  6070.-GOSUB  5  [3154] 
500:'  E  ; 1 2 

5080  MOVER  50, 0:1a =10: RESTORE  6080:GOSUB  5  [4147] 
500 : MOVER  10,30: la=4 :GOSUB  5500:'  R  ; 1 4 
5090  MOVER  40,0: la=4 :RESTORE  6090:GOSUB  55  [4350] 
00:'  '  ; 4 


5092  MOVER  20 , -30 : la=1 2 :RESTORE  6020:GOSUB  [1799] 
5500:'  S  ; 1 2 

5100  MOVER  80, 0:la=10: RESTORE  6040:GOSUB  5  [2339] 
500:'  F  j 1 0 

5110  MOVER  50,0 :1a =8: RESTORE  6110:GOSUB  55  [3898] 
00 : MOVER  1 0 , 30: la=4 :GOSUB  5500:'  A;12 
5112  MOVER  40 , -30 : la=1 2 : RESTORE  6000:GOSÜB  [2957] 
5500:'  M;  12 

5120  MOVER  7 0 , 0 : la  =  4 : RESTORE  6120:GOSUB  55  [4323] 
00:’  I;  12 

5130  MOVER  20,0: la=6 :RESTORE  6130:GOSUB  55  [2668] 
00:'  L  ;  6 

5140  MOVER  50,0: la=9 :RESTORE  6140:GOSUB  55  [2714] 
00 : '  Y  ;  9 


5400  RETURN  [555] 

5500  FOR  k=1  TO  la  [1351] 

5510  READ  kl  , k2 : DRAWR  kl , k2 :NEXT: RETURN  [3077] 

6000  DATA  0,50,10,0,20,-20,20,20,10,0,0,-5  [3791] 
0,-10,0,0,35,-20,-20,-20,20,0,-35,-10,0 
6010  DATA  20,0,0,10,-20,0,0,-10  [911] 


6020  DATA  0,10,30,0,0,10,-30,0,0,30,40,0,0  [3083] 

,-10,-30,0,0,-10,30,0,0,-30,-40,0 

6030  DATA  0,50,40,0,0,-50,-40,0,0,30,20,0,  [2490] 

0,-30, -20,0 

6040  DATA  0,50,40,0,0,-10,-30,0,0,-10,20,0  [2862] 

,0,-1 0,-20, 0,0, -20, -10,0 

6050  DATA  0,40,-20,0,0,10,50,0,0,-10,-20,0  [1495] 
,0,-40, -10,0 

6060  DATA  0,50,40,0,0,-30,-30,0,0,-20,-10,  (34531 

0,0,10,20,0,0,-10,-20,0 

6070  DATA  0,50,40,0,0,-10,-30,0,0,-10,20,0  [3522] 
,0,-10,-20,0,0,-10,30,0,0,-10,-40,0 
6080  DATA  0,50,40,0,0,-30,-10,0,10,-20,-15  [4281] 
,0,-10,20,-5,0,0,-20,-10,0,0,10,20,0,0,-10 
,-20,0 

6090  DATA  0,20,10,0,0,-20,-10,0  [860] 

6110  DATA  0,50,40,0,0,-50,-10,0,0,20,-20,0  [3977] 
,0,-20,-10,0,0,10,20,0,0,-10,-20,0 
6120  DATA  0,50,10,0,0,-50,-10,0  [1678] 

6130  DATA  0,50,10,0,0,-40,30,0,0,-10,-40,0  [2085] 
6140  DATA  0,20,-20,30,15,0,10,-20,10,20,15  [3462] 
,0,-20, -30, 0,-20, -10,0 

8000  CALL  8BB03 : LOCATE  6,12:PRINT  SPACE$(3  [7441] 
0 ) : LOCATE  6,12: INPUT"Schwierigkeitsgrad  [ 

1-5  ]";schw$ 

8010  IF  schw$<"1 "  OR  schw$  >"5"  THEN  SOUND  [3176] 
1 , 1 QO,50:GOTO  8000 

8020  sch= ( VAL( schw$ ) -1 )*3:POKE  88544, sch  [2019] 
8030  sch= ( VAL( schw$ ) -1 )*X  I 1 1  :  63<=  [3326] 

X  <=3  Geschwind ikeitsveraenderung  1 
8040  RETURN  [555] 


Listing  2 


I  MODE  2:PRINT"Bitte  warten,  die  Datei  PF.  [6997] 
OBJ  wird  erzeugt  und  gespeichert" 

10  DATA  802,84A,801 , 8AF ,803,84A,800, 8AF, SO  [5625] 
1 ,823,S02,S4A,801 , 823 ,803 , &4A, &01 ,823,802, 

S4A, 801 ,S23,&03,S4A,&01 , S23 , &02 , S1 9 , &00 ,&2 
3,  1052 

II  DATA  S02,S19,&00,S23,S03,S05,S00,S23,&0  (6546] 
3,S14,&00,S23,S02,&14,SOO,S23,S03,S1E,S01 , 
S23,S02,&1 9, SOI ,S23  ,S03,S1 4 ,S01 ,S23,S02,S0 

F,  428 

12  DATA  SOI ,S23,S02,S1E,S01 , S23 , S03 , S37 , SO  [6112] 
O,S23,S02,S32,SOO,S23,SO3,S1E,SO0,S23,SO2, 
S23,S00,S23,S03,S1E,S00,S23,S02,S19,S01 ,S2 

3,  555 

13  DATA  S03,S32,S01 , S23 , S02 , S2D, SOI ,S23,S0  (5202] 
3 , S28 , SOI , S23 , S02 , S1 E, SOI , S23 , S02 , S1 D, S00 , 
SAF,S63,S20,S62,S20,S20,S64,S65,S63,S20,S6 

2,  1248 

14  DATA  S20,S20,S20,S64,S65,S63,S20,S62,S2  (48221 
0,S20,S20,S20,S64,S65,S63,S20,S62,S20,S20, 
S20,S20,S20,S64,S65,S63,S20,S62,S20,S20,S2 

0,  1770 

15  DATA  S20,S20,S20,S64,S65,S63,S20,S62,S2  [5246] 
0,S20,S20,S20,S20,S20,S20,S64,S65,S63,S20, 
S62,S20,S20,S20,S20,S20,S20,S20,S20,S64,S6 

5,  1637 

16  DATA  S63,S20,S62,S20,S20,S20,S20,S20,S2  [5580] 
0,S20,S20,S20,S64,S65,S63,S20,S62,S44,S45, 
S44,S45,S44,S45,S64fS65,S49,S4E,S43,S20,S4 

9,  1882 

17  DATA  S4E,S43,S20,S20,S20,S20,S20,S49,S4  [6060] 
E,S43,864,S65,S64,S65,S69,S6E,S63,S69,S6E, 

863, 820, 864, 865, 820, 869, 86E, 863, 820, 864, 86 
5,  2365 

18  DATA  S20,S20,S69,S6E,S63,S20,S64,S65,S2  [5204] 
0,S20,S2O,S69,S6E,S63,S20,S64,SO0,SOO,S00, 
SOO,SOO,S30,SCO,SOO,SOO,S07,SOE,SOO,SOO,SO 

5,  1419 

19  DATA  S0A,S00,S00,S87,S1E,S00,S00,SF0,SF  [6424] 
0,800,&00, SCO ,S30,S10,S00,S60,S60,S20,S30, 
SB4,SD2,SC0,S40,S27,S4E,S00,S80,S2F,S4F,S0 

0,  2200 

20  DATA  S11 ,SAF,S5F,S88,S11 , SFF, SFF, S88 , SO  [5745] 
0 , SF7 , SFE ,S00,S00,SB3, SDC, SCO ,830,880,800, 

800, 820, 820, 820, 820, 820, 820, 869, S6E,S63, 82 
0,  2892 

21  DATA  864,865,826,826,842,843,800,800,80  [6076] 
0, 800, 800, 8 30, SCO, 800, 800, 8FE,8F7, 800, 810, 
S99,899,880,820,89B,89D,840,820,8BB,8DD,82 

0,  2481 

22  DATA  800, SED, 87B, 800, 840, 870, SE0, 800, 82  [5145] 
0,810,880,800,810, 8F7 , SFE, 880 ,800,833, SCC , 

540, 800, 807, 80E, 840, 800, 877, SEE, 800, 800, 80 
7,  2349 

23  DATA  80E, 800, 801 ,840,820,808,801 ,80C, 80  [6289] 
3,808,826,842,843,832,836,820,820,863,861 , 
86C,86C, 820, 826, 842, 843, 832, 836, 820, 820, 82 

0,  1297 

24  DATA  863,861 ,86C,86C, 820, 826, 842, 843, 83  [6017] 
2,836,820,820,820,820,863,861 ,86C, 86C,820 , 
826,842,843,832,836,820,820,820,820,820,86 

3,  1825 

25  DATA  86 1  , 8 6C, 8 6C, 820, 826, 8 42, 843, 832, 83  [6353  1 
6,820,820,820,820,820,820,863,861 ,86C,S6C, 
820,826,842,843,832,836,820,820,820,820,82 

0,  1691 

26  DATA  820,820,863,861 ,86C,86C, 820, 826, 84  14703] 
2,843,832,836,820,820,820,820,820,820,820, 
820,863,861 ,86C,86C,820 , 826 , 842 , 843 , 832 , 83 

6,  1758 

27  DATA  820, 820, 800, 800, 800, 800, 800, 830, 8C  [4539] 
0, 800, 800, 807, 80E, 800, 800, 805, 80A, 800, 800, 

887, SIE, 800, 800, 8F0,8F0, 800, 880, SCO, 8 30, 80 
0,  1353 

28  DATA  840,860, SE0 ,800,830, 8B4 , 8D2 , SCO , 80  [5802] 
0,827,84E,820,800,82F,84F,820,81 1 ,SAF,S5F, 

888,811 , SFF, SFF, 888, 800, 8F7, SFE, 800, 8 30, SB 

3,  3135 

29  DATA  SDC, 800, 800, 800, 810, SCO, 82C, 861 ,86  (56121 
C, 864,86c, 864, 820, 828, 868, 86C, 829, 82C, 861 , 

8 20, 8 6C, 864, 8 20, 828, 868, S6C, 829 ,82C,861  ,82 
0,  2189 

30  DATA  820, 86C, 864, 820, 828, 868, 86C, 829, 82  [6570] 
C, 861 ,820, 820, 820, 86C, 864, 820, 828, 868, 86C, 
S29,S2C.S61 . 820, 8 20, 820, 820, 86C, 864, 820 «82 
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8,  1884 

31  DATA  468, 4 6C, 429,420,461 ,420 ,&20,&20,&2  [4946] 
0,420, 460,464 ,420,428, 468,460,429 ,420,461  , 

420.420.420.420.420.420.460.464.420.428.46 
8,  1804 

32  DATA  460, 4 29, 420,461, 420, 420, 4 20, 420, 42  E6418] 
0,420,420,460,464,420,428,468,460,429,420, 

461 .420.420.420.420.420.420.420.420.460.46 
4,  1652 

33  DATA  420,428,468,460,429,420,461,420,42  [5992] 
0,420,420,420,420,420,420,420,460,464,420, 
428,468,460,429,420,461 ,428,444, 445,429,44 

1,  1711 

34  DATA  444,445,428,444,445,429,441,441,42  [5573] 

C,  428, 444, 445, 429, 461 ,420,428,464,465,429, 
440,444,420,420,440,444,420,420,420,420,42 
0,  1682 

35  DATA  440,444,441 , 435 , *55 , 435 , 441 ,435,45  [5308] 

5.435.441 .435.455.435.441 .441 .435.455.400, 

400, 400, 400, 400, 430, 400,400, 400, 407, 40E, 40 
0,  1441 

36  DATA  400, 405, 40A, 400, 400, 487, 41E, 400, 40  [6175] 
0 , 4F0 , 4F0 , 400 , 400 , 400 ,430,400,400,470, 4E0 , 

400, 430, 4B4,4D2, 400,440, 427, 44E, 420, 440, 42 
F,  2190 

37  DATA  44F,420,411 , 4AF, 45F, 488,411, 4FF, 4F  [6465] 
F, 488, 400, 4F7 , 4FE, 400 , 400 , 4B3 , 4DC, 400 ,430 , 

480.410.400.420.460.464.420.461.420.428.46 
4,  3034 

38  DATA  465, 429, 420, 420, 420, 420,460, 464, 4D  [6066 3 
2 , 4D2 , 4D2 , 40F, 4F0 , 4F0 , 4F0 , 40F, 4B4 ,4B4 ,40F, 
4D2,4D2,40F,4F0,4F0,4F0, 420, 420, 420, 460,46 

4,  3692 

39  DATA  420,461,420,428,464,465,429,431,43  [5893] 
1 ,437,4D2,4D2,4D2,40F,4F0,4F0,4F0,40F,4E1 , 

4E1 , 40F , 4F0 , 4F0 , 40F , 4D2 , 4D2 , 4D2 , 4F0 , 4F0 , 4F 
0,  4298 

40  DATA  40F,478,478,478,40F, 4D2 , 4D2 , 40F, 47  [5583] 
8,478, 40F, 4F0 , 4F0 , 4F0 ,478,478,478, 40F,4B4 , 

4B4 , 4B4 , 40F , 4F0 , 4F0 , 40F , 478 , 478 , 40F , 4B4 , 4B 
4,  3840 

41  DATA  4B4, 437, 420, 420, 460, 464, 420, 462, 42  [6995] 
0,431 ,437,420,420,420, 4F0 , 4FQ , 4C0 , 40D, 492 , 

492 , 492 , 40B,4D0 , 4E0 , 40F, 4B4 , 4A4 , 40D, 4E1  ,4E 
1,  3269 

42  DATA  4E0, 4B4, 41 0,4A4,40F, 450, 4D2, 402,40  [63641 
1 ,4FO,400,40D,4A1 , 400 , 40D, 4A0 , 470 , 4F0 , 4B4 , 
4B4,4B4,407, 4B0 , 4B0 , 4B0 ,40B,470,478,40F,4D 

0,  3564 

43  DATA  430 , 40F, 4B4 ,434 ,434,464,420,462,42  [5376] 
0,431 ,437, 420, 420, 420, 420, 420, 420, 420, 4D2, 

4D2 , 4C0 , 40E, 4D0 , 4C0 , 4B0 , 40B, 4D2 , 4D2 , 40F , 4E 
1,  2822 

44  DATA  4E0 , 40E, 4E0 , 4E0 , 4F0 , 4E1 ,4E1 ,421 ,40  [6651] 

D,  458, 4 30, 4 68, 40D, 4D0 , 4F0 , 40F, 440 , 4A1 ,400, 

4A4 , 480 , 4B4 , 4D2 , 4B0 , 442 ,40E, 400 , 4A4 , 4 A4 , 40 

E,  3655 

45  DATA  458 , 478 , 40F, 440 , 4E0 , 40D, 401 ,401 ,4E  [5442] 
1 , 4F0 , 4F0 , 4F0 , 40B, 452 , 4D2 , 4D2 , 40F, 478 , 438 , 

407 , 4B4 , 4B4 , 403 , 4F0 , 4F0 , 4F0 ,420,469,46E,46 
3,  3995 

46  DATA  420,468, 460,420, 420, 420, 469, 46E,4E  [57951 
1 , 4E1 , 4E1 ,40E,490,4D0,4E0,40E,4A4,4B4,40F, 

4F0 , 4F0 ,400, 4D2 , 4D2 , 4D2 , 4F0 , 4F0 , 4F0 , 401 , 4D 
0,  4244 

47  DATA  4C2 , 4C2 , 40E, 4E0 ,460,406,414,430,40  [5443] 

F,  4F0 , 4F0 , 4F0 , 4B4 , 4B4 , 4B4 , 40F, 4F0 , 4F0 ,4F0 , 
400,428, 428, 40A,4C1 ,4E1 , 40F, 4B4 , 4B4 , 4B4 , 4F 
0,  4121 

48  DATA  4F0,4F0,40F,4B4,4B4,4B4,40F, 400,48  [5932] 
2 , 40A, 4A0 , 4D0 , 40F, 4B4 , 4B4 , 4B4 ,478 , 478,448 , 

40A , 4A2 , 4A2 , 4A2 , 40E, 4D0 , 480 , 40E ,458,438,40 
D,  3634 

49  DATA  452, 452, 4D2, 468, 460, 450, 44F, 450, 42  [7228] 
0,450, 44F, 450, 420, 420, 420, 420, 420, 450, 44F, 

4 50, 4 68, 460,468, 4 6C, 470, 46F, 470, 470, 4 6F, 47 
0,  2589 

50  DATA  420, 468, 460,420, 470, 46F, 470, 420, 46  [4991] 
8, 460,420, 420, 470, 46F, 470, 420, 468, 460,420, 

420, 420, 470, 46F,  470, 420.,  468, 460,420, 4  20, 42 
0,  2269 

51  DATA  420, 470, 46F, 470, 420, 468, 460,420, 42  [5358] 
0, 420, 420, 420, 470, 46F, 470, 420, 468, 460,420, 

4 20, 4 20, 420, 4 20, 420, 470, 46F, 470, 420, 4 68, 46 
C,  2121 

52  DATA  420,420,420,420,420,420,420,470,46  [3069] 
F, 470, 420, 468, 460,420, 420, 420, 420, 420, 420, 

400.400,  995 

53  dat=0  :  sz=0  :  dz  =  10  [3191 


sehen  wir  uns  gezwungen,  aufgrund  der  extremen  Nach¬ 
frage  den  Preis  für  das 

MousePacK 

zu  erhöhen.  Die  Preiserhöhung  auf  DIU  228.-  tritt  am 
01.08.198B  in  Kraft.  Bestellungen,  die  uns  noch  vor 
diesem  Tag  erreichen  (Datum  des  Poststempels),  werden 
noch  zu  den  alten  Konditionen,  d.h.  für 

DH  198. - 

geliefert.  Für  den  Fall,  daB  Sie  wirklich  noch  nichts 
von  dieser  neuen  Dimension  des  Eingabemediums  "Maus" 
für  Ihren  CPC  gehört  haben  sollten,  senden  wir  Ihnen 
auf  schriftliche  oder  telefonische  Anfrage  gerne  unse¬ 
ren  kostenlosen  Gesamtkatalog  samt  flousePack-Info  zu. 

Bestellen  auch  Sie  noch  heute  Ihr  MousePack  bei  jedem 
gut  sortierten  Fachhändler  oder  direkt  bei: 

GERDES,  Imperial  SOFTware  Systems 

Heidegar tenstr .  36  /  5300  Bonn  1 
Telefon:  0228  /  25  24  74 

P.S.s  machen  Sie  sich  doch  einfach  'mal  den  Spaß, 
unser  mousePack  mit  jedem  Konkurrenz-Produkt  zu  ver¬ 
gleichen. 


JOYCE  &  CPC  als  BÜROMASCHINE 


FIBUKING  -  Finanzbuchführung 

Einfach  zu  benutzendes  Buchführungsprogramm  auf  der  Basis 
einer  doppelten  Buchführung: 

-  Bilanz  wahlweise  auf  Monitor  oder  Drucker  (auch  auszugsweise) 
-60  definierbare  Konten,  bis  zu  99999  Buchungen 

-  mehrere  Buchführungsdateien  auf  einer  Diskette  anlegbar 
-Ausdruck  von  Grundbuch,  Kontenblatt,  Kontenrahmen  auf 

Einzel-  oder  Endlospapier 

-deutsche  Anleitung,  sowie  deutsche  Sonderzeichen 
-ideal  für  Kleingewerbe  und  Freiberufler 
FIBUKING  für  JOYCE  oder  CPC, 

3”-Disc  incl.  Anleitung  nur  1 36,-  DM 

PROFIREM  -  das  Geschäftssoftwarepaket 
Fakturierung,  Adressenverwaltung  und  Lagerdatei 
JOYCE-Version  (1 000  Adressen,  1 000  Artikel), 

3"-Disc  nur  178 -DM 
CPC-Version  (400  Adressen,  400  Artikel),  3”-Disc  nur  1 36,-  DM 

TEXTKING  -  die  moderne  Textverarbeitung 
Besonders  die  einfache  Bedienung  der  vielfältigen  Möglichkei¬ 
ten  kennzeichnet  dieses  leistungsfähige  Programm. 

-  Blocksatz,  verschiedene  Schriftarten,  Tabulator,  Fioskeltasten, 

-  Suchen  &  Ersetzen,  Wortumbruch,  wahlweise  D I N-T astaturbeleg u ng, 
-integrierte  Diskettenverwaltung,  Schnittstelle  zu  ADRESCOMP. 
TEXTKING  fürCPC,3”-Disc  incl.  40-seitiger  Anleitung  nur  98  ,-DM 


SOIP'Ü'TOyaS 


ELFRIEDE  VAN  DER  ZALM  -Softwareentwicklung  &  Vertrieb 
Schieferstätte  -  2949  WANGERLAND  3 -Tel.:  04461  /5524 
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1 1 1  IHM  Hl  1 1 1 1 1 1 III 1 1  HMII III 1 1 1 1 1 III  1 1 1 1 1 1 1  I  1 1  I 


1111111111111111111111111111111111111111111111111 


54  FOR  adr  =-32768  TO-31488  [1424] 

55  READ  byte  :  dat=dat+1  [956] 

56  sz=sz+byte  [619] 

57  POKE  adr, byte  [84] 

58  IF  dat  <  30  AND  adr  <  -31488  THEN  62  [499] 

59  READ  chksum  [1222] 

60  IF  chksumosz  THEN  PRINT  "Fehler  in  Z  [3056] 

eile  :";dz 

61  dz=dz  +  1  :  sz=0  :  dat=0  [1666] 

62  NEXT  adr  [547] 


1000  DATA  421 ,&4B,&C8,&1 1,490,401 ,422,406,  [6390] 
485,419,422,408,485,419,422,40A,485,419,42 
2,40C,485,419,422,40E,485,421  ,401  ,4C8,422, 

404 ,  1727 

1001  DATA  485, 4 3E, 4 4B, 432, 432, 485, 432, 434,  [6232] 
485,432,436,485,432,438,485,432,43A,485,43 

E, 400, 432, 41E, 4 85, 432, 4 20, 485, 432, 4 22, 485, 

&32 ,  2212 

1002  DATA  424,485,432,426,485,432,412,485,  [4936] 
432,414,485,432,416,485,432,418,485,432,41 

A, 485, 4 32, 42  A, 485 , 4C9 ,  421  , 4A6 , 4C8 , 41 1 ,  470 , 

&83 ,  2500 

1003  DATA  4CD, 40A, 493 , 421 ,  4A6 , 4C8 ,423,423,  [6452] 
423,411 , &B0 , 483 , 4CD, 40A,493 , 421 , 4A6 , 4C8 ,40 

1 ,406,400,409,411 ,470, 483, 4CD,40A, 493, 421 , 

4B5,  2803 

1004  DATA  4C8 ,411 ,470,483, 4CD, 40A, 493 , 421 ,  [6956] 
4B5, 4C8,401 ,403,400,409,411 , 440 , 484 , 4CD, 47 
5,493,421  ,4B5,4C8, 401 ,408,400,409,411  ,470, 

483,  2623 

1005  DATA  4CD, 40A, 493 ,421 ,4B5,4C8,401  ,40B,  [83131 
400,409,411 , 470, 483, 4CD, 40A, 4 93, 421 ,4C9,4C 

8,411 ,450,483, 4CD, 4FA, 892,421 , 4C9 , 4C8 , 423 , 

411,  3168 

1006  DATA  470,483, 4CD, 40A, 493 ,421 , 4E2 ,4CB ,  [5963] 
411 ,470,483 , 4CD, 40A,493 , 421  ,4E5,4C8,411  ,45 
0,463, 4CD, 4FA, 492,421 , 4E6 , 4C8 ,411  ,470,483, 

4CD,  3905 

1007  DATA  40A, 493, 421 ,4E9,4C8, 411 ,450,483,  (59491 
4CD, 4FA, 492 ,421 ,4D3,4C8,41 1 , 4F0 , 483 , 4CD, 43 
8,493,421 , 4D7 , 4C8 , 41 1 , 440 , 484 , 4CD, 475 , 493 , 

421,  3855 

1008  DATA -4E6,4E1 ,411  ,470, 483, 4CD,40A, 493,  [6621  ] 
421 ,4E9,4E1 ,411 ,450,483, 4CD, 4FA, 492 , 421 , 4F 

0 ,4E1 ,411 ,4F0,483,4CD,438,493,421 ,4F4,4E1 , 

411,  4210 

1009  DATA  440, 484, 4CD, 4 7 5, 49 3, 421 ,4FF,4E1 ,  [6234] 
411  ,470,483, 4CD, 40A, 493 ,421  ,402,4E2,411  ,47 
0,483,4CD,40A,493,421  ,405,4E2,411  ,470,483, 

4CD,  3412 

1010  DATA  40A, 493, 421 ,40E,4E2, 411 ,470,483,  [6532] 
4CD, 40A, 493, 421 ,411  , 4E2 , 41 1  , 4B0 , 483 , 4CD, 40 

A, 493, 421 ,414, 4E2,4l 1 , 470 , 483 , 4CD, 40A , & 93 , 

421,  2948 

1011  DATA  417, 4E2, 411 ,4B0, 483, 4CD,40A, 493,  [6723] 
421 ,41A,4E2,411  , 470 , 483 , 4CD, 40A,493 , 421 ,41 
D,4E2,411 , 4B0 , 483 , 4CD, 40A, 493,421  ,420,4E2, 

411,  3124 

1012  DATA  450,483, 4CD, 4FA, 492 ,421 , 427 ,4E2 ,  [5643] 
4 1 1  ,470,483, 4CD,40A, 493 ,421 ,426, 4FB, 411 ,47 
0,483 ,4CD, 40A, 493 , 421  ,429,4FB,41 1  ,440,484, 

4CD,  3419 

1013  DATA  475,493,421 ,42E,4FB, 411 ,4B0, 483,  [5494] 
4CD, 40A, 493 , 421 ,431 ,4FB,41 1 ,470 ,483,4CD,40 

A, 493, 421 ,43A,4FB,411 ,450,483, 4CD,4FA,492, 

421,  3439 

1014  DATA  43B, 4FB, 41 1 ,470,483 ,4CD,40A,493 ,  [6251] 
421  , 444 , 4FB ,411  ,470 , 483 , 4CD, 40A, 493 , 421 ,44 

7 , 4FB , 41 1 ,470,483, 4CD,40A,493 , 421 ,44A,4FB, 

411,  3258 

1015  DATA  470,483, 4CD, 40A,493 ,421 ,453, 4FB ,  [5461] 
411 , 4F0 ,483 , 4CD, 438 ,493,421  ,45D,4FB,411  ,44 

0, 484, 4CD, 475, 493, 421 ,462,4FB,41 1 , 4B0,483, 

4CD,  3738 

1016  DATA  40A, 493, 421 ,465, 4FB, 411 ,440,484,  [5381] 
4CD, 475, 493, 421 , 4B6 , 4D4 , 411 , 470 , 483 , 4CD, 40 

A, 493,421 , 4B9 , 4D4 ,411 , 470 , 403 , 4CD, 40A, 493 , 

421,  3358 

1017  DATA  4BC,4D4,411 ,470,483,4CD,40A,493,  [5855] 
421 ,4C5,4D4,411  , 450 , 483 , 4CD,4FA, 492 , 421  ,4C 

6 , 4D4 , 41 1 , 4F0 , 483, 4CD, 438 ,493,421 ,4CA,4D4, 

411,  3996 

1018  DATA  4BQ , 463 , 4CD , 40 A, 493, 421 , 4CD, 4D4 ,  [5205] 
411 ,440, 484, 4CD, 475, 493, 421  , 4D2 , 4D4 , 41 1 , 45 
0,483, 4CD, 4FA, 492 ,421 ,4D9, 404,411  ,470,483, 

4CD,  4012 

1019  DATA  40A, 493, 421 ,4DC,4D4, 411 ,470,483,  [6375] 
4CD, 40A, 493 , 421 , 4DF , 4D4 , 41 1 ,470,483, 4CD, 40 

A, 493, 421 , 4E8 , 4D4 ,411 ,450,483,4CD,4FA,492, 


421,  3673 

1020  DATA  4E9 , 4D4 ,411, 4B0 , 483 , 4CD, 40A, 493 , 
421 , 4F2 , 4D4 ,411 ,440,464, 4CD, 475 ,493,421 , 4F 
7,404,411 , 4B0 , 483 , 4CD, 40A, 493 ,421 ,4F6,4ED, 
411,  4011 

1021  DATA  450,483, 4CD, 4FA, 492 , 421 , 4F7 , 4ED, 
411 ,470,483, 4CD, 40A, 493 ,421  ,400,4EE,411 ,47 
0 , 4 83 , 4CD, 40A, 4 93 , &21 ,403,4EE,411 ,4B0,483, 
4CD,  3647 

1022  DATA  40A, 493, 421  ,406, 4EE, 411  ,470,483, 
4CD,40A,493 ,421 , 40F, 4EE, 41 1 , 440 , 484 , 4CD, 47 
5,493,421 ,414, 4EE, 41 1 , 4F0, 483,4CD,438 ,493, 
421,  3144 

1023  DATA  418, 4EE, 411 ,440, 484, 4CD, 475, 493, 
421 ,423 ,4EE ,411 , 470 ,483 , 4CD, 40A,493 , 421 ,42 
6 , 4EE, 41 1 ,450,483, 4CD, 4FA, 492 ,421 ,427, 4EE, 
411,  3337 

1024  DATA  470,483, 4CD, 40A, 493 , 421 , 42A, 4EE , 
411  , 4B0 ,483 , 4CD,40A,493 ,421  ,42D,4EE,411 ,45 
0,483, 4CD, 4FA, 492 ,421 ,42E,4EE,41 1 ,470,483, 
4CD,  3531 

1025  DATA  40 A, 493 , 421 ,437, 4EE, 41 1 , 4B0 , 483 , 
4CD, 40A,493 , 4C9 ,406,411 , 4CD, 426 , 4BC, 41 A, 47 
7 , 4 CD, 426 , 4BC, 41 3,405, 4C8 , 4C3 , 4FF, 492 , 4 CD, 
426,  3463 

1026  DATA  4BC , 4E5 ,406,411 ,41A,477, 4CD, 426 , 
4BC, 4 13, 405 , 4C2 ,410, 4 93, 4E1 , 423 , 4E5 , 406 , 41 
1 ,41A,477, 4CD, 426 , 4BC ,413,405, 4C2 ,41F,493, 
4E1,  3106 

1027  DATA  423,406,411 ,41A, 477, 4CD, 426, 4BC, 
413,405, 4C8 , 4C3 ,42D,493 , 4CD, 426 , 4BC, 4E5 , 40 
6,411 ,41 A, 477, 4CD, 426, 4BC, 41 3,405, 4C2,43E, 
493,  2931 

1028  DATA  4E1 , 423 , 4E5 , 406 , 41 1 , 41 A, 477 , 4CD, 
426 , 4BC, 41 3,405, 4C2 ,44D,493, 4E1 , 423 , 4E5 , 40 
6,411 ,41A,477,4CD,426, 4BC, 41 3,405, 4C2 , 45C, 

493,  3075 

1029  DATA  4E1 ,423,406,411 ,41A, 477, 4CD, 426, 
4BC, 41 3 , 405 , 4C8 , 4C3 ,46A, 493 ,4CD, 426 , 4BC,4E 
5,406,411 ,4lA,477, 4CD, 426 , 4BC, 41 3,405, 4C2 , 
47B,  3131 

1030  DATA  493, 4E1 , 423 , 4E5 , 406 , 41 1 ,41A,477, 
4CD, 426 , 4BC,4l 3 ,405 ,4C2 , 48A, 493 , 4E1 , 423 , 4E 
5,406,411 ,41A,477, 4CD , 426 , 4BC, 41 3,405, 4C2, 
499,  3197 

1031  DATA  493 ,4E1 , 423 , 4E5 ,406,411  ,41A,477, 
4CD, 426 , 4BC, 41 3,405 ,4C2 , 4A8 , 493 , 4E1  ,423,40 
6,411 ,41A,477,4CD,426, 4BC, 41 3,405, 4C8j  4C3 , 
4B6,  3228 

1032  DATA  493, 4C9, 400, 400,400,400,400,400, 
400,400,400,400,400,400,400,400,400,400,40 
0,400,400,400,400,400,400,400,400,400,400, 
400,  348 

1033  DATA  400,400,400,400,400,400,400,400, 
400,400,400,400,400,400,400,400,400,400,40 
0,400,400,400,400,400,400,400,400,400,400, 
400,  0 

1034  DATA  400, 400, 400, 400, 43E, 400, 432, 42A, 
485 , 43A,428 ,485,432,43F,485,43A,428, 485 , 4F 
E , 400 , 4CA, 435 , 494 , 4FE, 401 , 4CA, 4F0 , 494 , 4FE, 
402,  2753 

1035  DATA  4CA, 4F4 , 494 , 4FE, 403 ,4CA,4FB,494 , 
4FE, 404 , 4CA, 405 , 495, 4 3E, 400, 4 32, 428, 485, 43 
A,450,485,43C,43C,43C,432,450,485,421 ,4E6, 
425,  3365 

1036  DATA  422,43D,465,4C9,421 , 46 A, 424, 422, 
43D, 485 ,421 , 4B0 ,4C8 , 4CD, 4D0 ,494 , 421 ,422, 4E 
2 , 4CD, 4D0 ,494,421  , 435 , 4FB, 4CD, 4D0 , 494 , 421  , 
4ED,  3824 

1037  DATA  4D4 , 4CD, 4D0 ,494,421  , 4FB, 4ED,4CD, 
4D0 , 494 , 4C9 , 421 , 4F2 , 422 , 422 , 43D, 485 , 421 ,4C 
4 , 4C8 , 4CD, 4D0 ,494,421,409, 4E2 , 4CD, 4D0 ,494 , 
421,  4445 

1038  DATA  43F, 4FB,4CD, 400,494, 421  ,4E3,4D4, 
4CD, 4D0 , 494 , 421 ,40A,4EE,4CD,4D0,494,4C9,42 
1 ,476,421 ,422, 4 3D, 48 5, 421 , 4CE, 4C8 , 4CD, 4D0 , 

494,  4363 

1039  DATA  421 ,4FA,4E1 , 4CD, 4D0 , 494 , 421 ,44E, 
4FB, 4CD, 4D0 ,494,421 ,4D4 , 4D4 , 4CD, 4D0 , 494 ,42 
1 , 41 E, 4EE, 4CD, 4D0 ,494,4C9,421, 4FA, 41 F,422, 
43D,  4482 

1040  DATA  485,421  ,4DD,4C8,4CD, 4D0, 494, 421  , 
4EB,4E1 ,4CD,4D0,494 ,421 , 458 , 4FB, 4CD, 4D0 , 49 
4,421 , 4C0 ,4D4,4CD,4D0,494,421 ,432 ,4EE,4CD, 
4D0 ,  4867 

1041  DATA  494 , 4C9 , 406 ,413, 4CD, 4DF , 494 , 4CD, 
426 , 4BC, 437 , 43F, 405 , 4C2 , 4D2 , 494 , 4C9 , 4C5 ,40 
6,404,43E , 40F, 477 ,423,405, 4C2 , 4E2 ,494 , 42B, 
42B,  3354 
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Programme 

1042  DATA  &2B, &2B, &C1 , &C9 ,  «CD, &3C, «94 , «C9 ,  (6815 1 
«CD, &3C, «94 , «CD ,  &  61  , «94 , &C9 , «CD, & 3C, «94 , &C 
D,&61  ,  «94  , «CD, «86 ,894, 8C9, «CD, «3C, «94 , «CD, 

«61 ,  4424 

1043  DATA  «94, «CD, «86, «94, «CD, «AB, «94, &C9,  [3495] 
«00, «00, «00, «00, «00, «00, «00,  1360 


1044  dat=0  :  sz=0  :  dz  =  1000  [556] 

1045  FOR  adr  —28672  TO-27368  [1329] 

1046  READ  byte  :  dat=dat+1  [956] 

1047  sz=sz+byte  [619] 

1048  POKE  adr, byte  [84] 

1049  IF  dat  <  30  AND  adr  <  -27368  THEN  1  [1200] 

053 

1050  READ  chksura  11222] 

1051  IF  chksum<>sz  THEN  PRINT  "Fehler  in  [3056] 

Zeile  :";dz 

1052  dz=dz  +  1  :  sz»0  :  dat=0  [1666] 

1053  NEXT  adr  [547] 

2000  DATA  «CD, «54, «90, «21 ,«01  , «C8 , «22 , «06 ,  [7793] 


«85 , «CD, «4E, «9A, «CD, «00 , «94 , «CD, «1 8 , «BB, «C 

D,  «00 , «90 , «CD, «OB, &A0 , «CD, «CC, &9C, «CD, «C3 , 

&9A,  3890 

2001  DATA  «2A, «00 ,«85,837, «3F, «CD, «A7 ,&9C,  [7351] 
«2A, «00 , «85 , «22 , «04 , «85, &CD,&09 ,&9E, &37,«3 

F, &3A,«2A, «85 , «FE, «01 ,&CA, &EB, &9B, &3A, &3F, 

«85,  2991 

2002  DATA  «FE, «1 4 , «CA, «44, &9A, &C3 ,«1 8 , &9A,  [7066] 
«37 , &3F, «3A,«28 ,«85 ,«3C, «32, «28 ,&85,«C9 ,«3 

E, &00,«32,&2C,«85, «CD, S0A,«9D,&21  ,«50, «81  , 

«22,  2841 

2003  DATA  «02, «85, «21 , «00, «80, «06, «37, «7E,  [7116] 
«23 , «56 , «FE, «00 , «CC, &83,«9A,SFE, «01 ,&CC,&9 

3 , «9A, «FE, «02 , «CC, «A3 , «9A, «FE, «03 ,«CC, «B3 , 

&9A,  3678 

2004  DATA  &23,«05,&C2,«61  ,&9A,&3E,«FF,S32,  [7105] 
&2C, &B5 , &C9 , &C5 , «E5 , &D5 , «CD, «06 , «9C, &3E, «0 

0 ,«D1 ,«15, «C2 , «85 , «9A, «El ,&C1 ,&C9,«C5,8E5, 

«D5,  4267 

2005  DATA  &CD,&1  B,«9C, &3E, «01  , «Dl  ,&1  5 ,&C2,  [7425] 
«95 , &9A, SEI ,«C1 ,&C9,&C5,&E5,«D5,&CD,«4A,&9 
C,«3E, «02 , «Dl ,«15, «C2 , &A5 , «9A, «El ,&C1 ,*C9, 

&C5,  4494 

2006  DATA  8E5 , &D5 , «CD, «30 , &9C, &3E, «03 , «Dl ,  [6597] 
«1 5,&C2,«B5,&9A,«E1 ,«C1 , «C9 , &3E, «00 , «CD, *2 
4,&BB,&37,«3F,«FE,&01 ,&CA,&DF,&9A(«FE,Ä02, 

«CA,  4194 

2007  DATA  «21  ,Ä9B,&FE,&04,&CA,Ä64,&9B,«FE,  [5290] 
Ä08,«CA,&A6,&9B,«C9,&3E,&00,&32,&3F,&85,«2 

A, &00,&85,&CD,&83,&A0,Ä37,&3F,&06,&04,«7E, 

«FE,  3376 

2008  DATA  «00 ,«CC, &A8 , &A0 , «CA ,&06 ,«9B, «FE,  [6222] 
«FF, «CA ,&06 , &9B, «FE, «0F, «CA, «B2 , «A0 , &3E, «0 

1 ,&32,&2A,&85,&23,&05,&C2,&EE,*9A,&E5,«2A, 

&3D,  3822 

2009  DATA  &85,SED,&4B,&3F,&85,&ED,&42,«DC,  [47991 
«DE,&A0,«37 , &3F, «22 , &3D, «85 , SEI ,&C3,&06,&9 

C, «3E, «00,432, &3F,& 85 ,&2A, «00, «85, «01 ,«A0, 

«00,  3118 

2010  DATA  «09 , «37 ,S3F, 806,804 , «7E,«FE, «00 ,  [5961] 
«CC , &A8 , &A0 , &CA, 849 ,&9B, «FE, «FF, «CA, «49 ,89 

B,  8FE,«0F, «CA, &BD, &A0 , &3E, «01 , «32 , &2A, «85, 

«23,  3561 

2011  DATA  &05,&C2,«31 , &9B, &E5 , S2A, &3D, «85 ,  [4700] 
«ED, «4B, «3F , «85 , «ED, «42 , 8DC, 8DE,«A0 ,&37 , «3 

F, 822,«3D,«85, «El , &C3 , «1 B, &9C, &3E, «00 , «32 , 

&3F,  3405 

2012  DATA  &85,&2A,&00,&85,«2B,&37,«3F,&06,  [7453] 
«10 ,&7E, «FE , «00 , «CC, &A8 , «A0 , «CA , «89 , «9B , «F 

E , «FF , «CA, 889 , &9B ,8FE, «0F, «CA, &C8 , 8A0 ,&3E, 

«01 ,  3794 

2013  DATA  & 32, «2 A, 885, «CD, «61 ,&AO,«05,«C2,  [6088] 
«71 , &9B, &E5 , &2A,«3D,&85, «ED, «4B, &3F, «85 ,8E 

D,  «42 ,&DC, «DE, «A0 ,837 ,«3F, «22 ,83D,&85 , «El , 

ÄC3,  3798 

2014  DATA  «30 , &9C, &3E, «00, «32 ,«3F, «85, &2A,  [7891] 
«00, «85, «23, «23, «23, 823, «37, &3F, «06, «10, «7 

E,  «FE, «00 , «CC, «A8 , «A0 , «CA, «CE, &9B , «FE, ÄFF, 

«CA,  3153 

2015  DATA  &CE,&9B,&FE,Ä0F,&CA,«D3,ÄA0,&3E,  [7385] 
«01 ,&32,&2A,&85 , «CD , «61 ,8A0,&05,&C2,«B6,&9 
B,&E5,&2A,&3D,Ä85,ÄED,Ä4B,«3F,&85,ÄED,«42, 

ÄDC,  3985 

2016  DATA  «DE, «AO ,&37,&3F,«22,«3D,885, «El ,  [7338] 
«C3 , &4A, &9C, «CD, «CC, &9C, &2A, «04 ,885, «06, «6 

4 , &C5 , «CD, «06 , «9C, «CD, «30 , &9C, «CD,«1  B,«9C, 

«CD,  3794 

2017  DATA  «4A, &9C, &C1 , «05 , «C2 , &F3 , &9B, &C9 ,  [4698] 
&2A,«00,&85 ,8CD, «83 , &A0,&22 , «00 , «85, «CD, &A 

7 , &9C, «CD, «60 , &9C,«3E,801 , «32 ,«3C, «85 , &C9 , 


BEKANNTMACHUNG 

Bei  unserem  allseits  bekannten  und  beliebten  Telefon-Service, 
dem  „Heißen  Draht",  gibt  es  eine  Veränderung. 

Sie  können  Ihre  Fragen  und  Anregungen  von 

1700  —  20°°Uhr 

an  die  Redaktion  von  Schneider  CPC  International  richten. 
Auf  Ihren  Anruf  freuen  sich:  Michael  Ceol  (Joyce),  Michael 
Ebbrecht  (Hardware),  Stefan  Ritter  (Redaktion),  Thomas 
Morgen  (Programmierung)  und  Heinrich  Stiller  (Spiele/Ad* 
ventures). 
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HEISSEN  DRAHT 
Tel.:  05651/8702 
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SR1  O/SRI  5  21  50,-/2650,- 
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&2A,  3593 

2018  DATA  800,885, 8CD, 860 , 8 9C, SCD, 861 , 8A0 ,  [54991 
822,800,885, SCD, SA7, 890, S3E, 802 ,832,830,88 

5 , 809 , 82A, 800 , 885, 82B,822 , 800 , 885 ,8CD, SA7 , 

S9C,  3168 

2019  DATA  8 2 A, 800 ,885 ,801 ,804,800,809, SCD,  [5957] 
S85,89C,a3E,a04,S32,S3C,S85,8C9,82A,800,S8 

5 , &CD, 885 ,890, 82 A, 800, 885, 823 ,822,800,885, 

SCD,  2444 

2020  DATA  8A7, 890, 83E, 808, 832, 830, 885,809,  [4823] 
SCD, 872 , 89C, 801  ,800,880, SED, 842,837 ,  83F , SC 

D, 872,89C,801 , 800 , 880 , 809 , 8C9 , 806 , 804 , S3A, 

82C,  2788 

2021  DATA  885, 877, 823, 805,8C2,874, 89C, 801 ,  [5875] 
804, 800, 8ED, 842, 837, 83F,8C9,8E5,8CD, 899,89 

C,8E1 ,801 ,800,880, 8ED, 842 , 837 , 83F, SCD, 899 , 

89C,  3417 

2022  DATA  801 ,800, 880, 809, 809,806, 810, 83A,  [6369] 
820, 885, 877, SCD, 861 ,8A0,8O5,8C2,89B, 89C,8C 

9 , SED, 85B, 802 , 885 ,806,810, 80D, &B8 , 8 9C, SCD, 

861,  3220 

2023  DATA  8A0, 805 ,802 , 8AD, 890,809, 8C5 , 806 ,  [6341] 
804,81A, 877,813, 823,805,802 , SBB, 89C, 801  ,80 

4, 800, SED, 842, 8 37, S3F, SCI , 8C9 , 82A, 804 , 885 , 

822,  2870 

2024  DATA  800 , 885 , 821 , 800 , 881 , 83A, 842 , 885 ,  [5831] 
8FE ,801 ,8CA,8E9, 890,801 ,800,801 ,S09,8FE,S0 

2, 8CA,8E9,a9C, 809, 83E, 800, 822, 802, 885,830, 

832,  2606 

2025  DATA  842 , 885 , 8C9 , 83A, 81 C, 885 , 832 , 81 E,  [4478] 
885, 83A, 81 0, 885, 832, 81 2, 885, S2A, 800, 885, 82 

2, 806, 885, 83A, 830, 885, 832, 832, 885, 809, 82A, 

806,  2309 

2026  DATA  885 , 822 , 800 , 885 , 83A, 81 E, 885 , 832 ,  [4580] 
81 C, 885, 83A, 81 2, 885, 832, 810, 885, 83A, 832, 88 
5,832,830,885,821 ,850,881 ,822,802,885,809, 

83A,  2282 

2027  DATA  81 C, 885 , 832 , 820 , 885 , 83A, 81 0 , 885 ,  [5804] 
832, 81 4, 885, 82A, 800, 885, 822, 808, 885,83A, 83 

0, 885, 832, 834, 885, 8C9,82A, 808, 885, 822, 800, 

885,  2161 

2028  DATA  83A, 820 , 885 , 832 , 81  C, 885 , S3A, 81  4 ,  [5886] 
885, 832, 810, 885, 83A, 834, 885, 832, 830, 885, 82 

1  ,850,881  , 822, 802, 885, 809, 83A, 81 C,885, 832, 

822,  2233 

2029  DATA  885 , 83A, 81 0 , 885 , 832 , 816 , 885 , S2A,  [47921 
800, 885, 822, SOA, 885, 83A, 830, 885, 832, 836, 88 

5, 8C9,82A,80A, 885, 822, 800, 885,83A, 822, 885, 

832,  2201 

2030  DATA  81 C, 885 , 83A, 81 6 , 885 , 832 , 81 0 , 885 ,  [5827] 
83A, 836, 885, 832, 830, 885, 821  ,850,881  ,822,80 

2, 885, 8C9, 83A, 81 C, 8 8 5, 832, 82 4, 8 8 5, 8 3 A, 810, 

885,  2306 

2031  DATA  832, 818, 885, 82A, 800, 885, 822,800,  [5204] 
885, 83A, 830, 885, 832, 838, 885, 8C9,82A, 800,88 

5, 822, 800, 885, 83A, 824, 885, 832, 81 C, 885, 83A, 

818,  2114 

2032  DATA  885, 832, 810, 885, 83A, 838, 885, 832,  [7015] 
830,885,821 ,850,881 , 822 , 802 , 885 ,809 , 83A, 81 

C,  8 85, 8  32, 826, 885, 83A, 81 0,885, 832, 81 A, 885, 

82A,  2320 

2033  DATA  800 , 885 , 822 , 80E,SB5 ,83A,830 , 885 ,  [7859] 
832, 8 3A, 885, 809 , 8 2A, 8 OE, 885, 8 22, 800, 885, 83 

A, 826, 885, 832, 810,885, 83A, 81A, 885, 832, 810, 

885,  2207 

2034  DATA  S3A, S3A, 885 , 832 ,830 , 885 , 821  , 850 ,  [6423] 
881 , 822, 802, 885,809, SCD, SOA, 89D, SCD, 846, 89 

E, 82A, 800,885, SCD, 8F1 , 890, SCD, 842 , 89D, SCD, 

846,  3377 

2035  DATA  S9E, S2A, 800 , 885 , SCD, 829 , 89D,8CD,  [56731 
S7A,S9D,8CD,846,89E,82A,S00,885,8CD,861 ,89 

D,  SCD, SB2 , 89D , SCD, 846 , &9E, S2A, 800 , 885 , SCD, 

899,  3793 

2036  DATA  89D, SCD, 8EA , 89D, SCD, 846 , 89E, 82A,  [5986] 
800 , 885 , 8CD, 8D1 , 89D, 8C9 , 83A, 81  0,885, 8FE, 80 

0 , 8CA, 85B, 89E, 8FE, 801 , 8 CA, 874 ,89E,8FE,802 , 

SCA,  4234 

2037  DATA  S8D , 89E, SC3 , 8A2 , 89E, 83A, 81 C, 885 ,  [6342] 
8FE, 800 , SCO, S63,89F,S3A,aiC,S85, 8FE, 801  ,8C 

C, 8A5 ,89F,S3A,ai0,885, 8FE, 800 , SCA, 8B7 , 89E, 

8C9 ,  3956 

2038  DATA  83A,81 C, 885 , SFE, 800 , SCO, 863 , 89F,  [59833 
8 3A, 810,885, 8FE, 801  , SCO, 8A5 , S9F, S3A,S1  0 , 88 

5, SFE, 801 ,8CA,80F,89F,8C9,8CD,80F,59F,83A, 

810,  3429 

2039  DATA  885 , SFE, SOI , 8C8 , 8CD,SB7 r8  9E, 83A,  [5994  ] 
81 0, 885, 8FE, 800,804, 863, 89F, 8C9 , SCD, SB7 , 89 

E, 83A, 81 0,885, SFE, 800,808, SCD, 80F,89F,83A, 

810,  3910 


2040  DATA  885,8FE,801 ,8C4,8A5,89F,8C9,82A,  [55301 
800, 885, SED, 85B, 804, 885, SED, 852, SCO, SEI  ,89 

F, 8 37, 83F, 82A, 800, 885, 8CD, 883 , 8A0 ,806,804, 

87E,  3581 

2041  DATA  SFE, 80F, 808,805, 8E5, SED, 85B, 804,  [6321] 
885, SED, 852, SCO, SEI ,89F,801 ,8A0,800,SED,84 

2,801 ,800,808, SED, 84A, 82B, SCO, SEI , 89F, 82B, 

SCO,  3929 

2042  DATA  SEI ,89F, 837, 83F, SEI ,SC1  ,823,805,  [6381] 
8C2 , SCD, 89E, 82A, 800 ,885, 80D, 883 , 8A0 , 822 , 80 

0 , 885 , 83E, 800,832,810,885, SCD, SA7 , 89C, SCD, 

842,  3415 

2043  DATA  8A0 , SCD, 8B8 , S9C, SC9 , 82A, 800 , 885 ,  [5595] 
SED, 85B, 804, 885, SED, 852, SCO, SEI ,89F, 837, 83 
F,S2A,S0O,S85,S01 , 8A0 , 800 , 809 , 806 , 804 , 87E, 

SFE,  3306 

2044  DATA  SOF, 8C8 , 8C5 , 8E5 , SED, S5B, 804 , 885 ,  [7073] 
837, 83F, SED, 852, SCO, SEI , S9F, 82B, SCO, SEI  , 89 
F,82B , SCO, SEI , 89F, 837 , 83F, SEI ,801,823,805, 

8C2 ,  4163 

2045  DATA  826 , 89F, 82A, 800 , 885 , SCD, 842 , 8A0 ,  [7283] 
80D, SB8 , 8 9C, 8 2A, 800, 885, 80D, 861 , SAO ,822,80 

0, 885, 83E, 801 ,832, 81 0,885, SCD, 8A7, 890,809, 

82A,  3185 

2046  DATA  800 , 885 , 82B, S2B, 82B, 8C5 , 8E5 , SED,  [8065] 
85B, 804, 885, SED, 852, SCO, SEI , S9F, 837 , 83F, 8E 

1  ,801  ,82A,800,885, 82B, 806,81 0 , S7E, SFE , SOF, 

8C8,  3431 

2047  DATA  SCD, 861 , SAO , 805 , 8C2 , 87E, 89F, 82A,  [6284] 
800,885,823,823,823 , SCD, 850, SAO, 82A, 800, 88 

5, 82B, 822, 800, 885, SCD, 8A7 , 89C, 83E, 802 ,832, 

810,  2714 

2048  DATA  885 , 8CD, 8E7 , 89F, 809 , 82A, 800 , 885 ,  [7003] 
823,823,823,805, 8E5 , SED, 8 5B, 804 , 885 , SED, 85 

2, SCO, SEI  , 89F , 837 ,S3F , SEI , SCI , 823 , 8 06 ,81 0 , 

87E,  3726 

2049  DATA  SFE, SOF, 8C8, SCD, 861 , SAO, 805,802,  (5172) 
SBD, 89F , S2A, 800 ,885 , SCD, 850 , SAO , 82A,800 ,88 
5,823,822,800,885, SCD, 8A7 ,89C,83E,803,832, 

810,  3134 

2050  DATA  885,8CD,SF9,89F,8C9,83E,801  ,832,  [5174] 
S2A, S85 , SC9 , 83A, 8 30, 885, 83D, 832, 8 30, 885, 8F 

E, 801 ,8C0,83E,S01 ,832,81 0,8  85, 837, S3F,8C9, 

83A,  3065 

2051  DATA  830, 885, 830,832, 830, 885, SFE-, 84B,  [6397] 
SCO , S3E, SOO ,832,810,885,837, 83F,8C9 ,8CD,8C 

C,  8 9C, 82 A, 800 , 885 , SCD, 8A7 , S9C , SCD, SOA, S9D, 

82A,  3267 

2052  DATA  800 , 885 , SCD, 8A7 , 89C,8CD, 842 , 89D,  [5956] 
8 2A, 800, 885 ,8CD, 8A7 , 89C, 80D, 87A, 89D,82A,80 

0 , 885,8CD, 8A7 , 890, SCD, 8B2, 89D,82A, 800 , 885 , 

SCD,  3899 

2053  DATA  8A7 ,890, SCD, 8EA,S9D, 82A, 800 , 885 ,  [6985] 
8CD,8A7,89C,8C9,8E5,837,83F,S01 ,800, 880, 8E 

D, 842,854,85D,S37,83F,8E1 ,809,806,810,805, 

SCD,  3747 

2054  DATA  842 , SAO , 81 A, 877 , SCD, 861 , SAO , SCI ,  [6903] 
805 , 8C2 , 852 , SAO ,809 , 8F5 ,837 , 83F, 8CD,869 , SA 

0 , 8F1 , 8C9 ,870,806 , 808 , 867 , 8E6 ,838, SCO , 87C, 

8D6,  4192 

2055  DATA  840 , 867 , S7D, SC6 , 850 , S6F, SDO , 824 ,  [57521 
87C, 8E6 , 807 , SCO ,870, 8D6 ,806,867, 8C9 ,8F5 ,83 

7, 83F, SCD, 88B, SAO, 8F1 ,809,870, SD6, 808, 867, 

8E6,  4116 

2056  DATA  838  , SFE, 838 , SCO , 870,806 ,840 , 867 ,  [58401 
87D , 8D6 , 850 , 86F, SDO ,870,825, 8E6 ,807 , SCO ,87 

C, 806,808, 867, SC9 , SC9 , SF5 , S3A, 83F, 885,830, 

832,  3819 

2057  DATA  83F, 885 , 8F1 , 8C9 , 837 , 83F, 83A, 83C,  [5813] 
885, SFE, 801 , SC8 ,803 , SC8 , 89A, 837 , 83F, S3A,S3 
0,885, SFE, 802, 8C8,8C3,8C8,89A, 837, 83F,83A, 

8 3C,  3621 

2058  DATA  885 , 8FE, 804 , 8C8 , 8C3 , 8C8 , 89A, 837 ,  [6051] 
83F,83A,830,885, SFE, 808 , 8C8 , 8C3 , SC8 , 89A, 83 

E,  81 4, 832, 83F, 885, 809,800, 800, 800, 800, 800, 

3049 


2059  dat=0  :  sz=0  :  dz  =  2000  [324] 

2060  FOR  adr  *-26112  TO-24344  [1050] 

2061  READ  byte  :  dat=dat+1  [956] 

2062  sz=sz+byte  [619] 

2063  POKE  adr, byte  [84] 

2064  IF  dat  <  30  AND  adr  <  -24344  THEN  2  [783] 

068 

2065  READ  chksum  [1222] 

2066  IF  chksum<>sz  THEN  PRINT  "Fehler  in  [3056] 

Zeile  :";dz 

2067  dz=dz  +  1  :  sz=0  :  dat*0  [16661 

2068  NEXT  adr  [547] 

2069  SAVE"pf.obj",b, 88000, 82200  [1394] 
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Stereo 

Volldampf 

voraus 


Für  alle  Stereo-Freaks,  die  keinen 
stereotüchtigen  TV-Apparat  besitzen 
oder  in  ständiger  Fehde  mit  den  übrigen 
Familienmitgliedern  liegen,  weil  der 
CPC  die  Stereoanlage  blockiert,  bieten 
wir  eine  preiswerte,  aber  schlagkräftige 
Lösung  an:  Spendieren  Sie  ihrem  Rech¬ 
ner  einen  eigenen  Stereoverstärker  - 
natürlich  selbstgebaut. 

Dieser  Verstärker  wird  mit  wenigen 
Bauteilen  aufgebaut  und  per  3,5  mm- 
Klinkenstecker  an  die  Stereobuchse 
der  CPCs  angeschlossen. 

Nachfolgend  finden  Sie  die  Aufstel¬ 
lung  aller  benötigten  Teile.  Der  Schalt¬ 
plan  (Bild  1)  stellt  nur  eine  Hälfte  des 
Verstärkers  dar;  in  der  Stückliste  sind 
deshalb  die  doppelt  benötigten  Teile 
mit  einem  Stern  (*)  gekennzeichnet. 

Stückliste: 

*  Poti  22 kOhm  log  (oder  Stereopoti 
2  x  22 kOhm  log) 

*  RI  =  lOOkOhm 

*  R2  =  lOOkOhm 

*  R3  =  lOOkOhm 

*  R4  =  ISOkOhm 

*  R5  =  4 ,7 kOhm 


IIIIMIMIMIIIM  IIIIIMIMIIIIMMII  r 


Hardware . 


*  R6  =  10hm, min.  1  Watt 

*  CI  =  Elko  1  mikroF 

*  C2  =  Elko  22  mikroF 

*  C3  =  Elko  100  mikroF 

*  C4  =  Elko  2  mikroF 

*  C5  =  100  nF 

*  C6  =  220  nF 

*  C7  =  Elko  2000  mikroF 

*  D1,D2  =  1N4001 

*  Operationsverstärker  TDA  2030 

*  LS  =  Lautsprecher  4-8  Ohm, 

10-  15  W 

*  Kühlkörper  für  TDA  2030 

-  Stab.  Netzteil  9V  250  mA 

-  Klinkenstecker  3,5  mm  Stereo 

-  Abgeschirmtes  ”Dioden”-Kabel  2pol 

-  Lochrasterplatine  oder  anderen 
Träger 


Der  Aufbau 


Die  Bauteile  können  auf  der  Platine 
"geographisch”  genau  nach  dem  Vor¬ 
bild  des  Schaltplans  positioniert  wer¬ 
den.  Am  besten  arbeiten  Sie  sich  von 
links  nach  rechts  durch  die  Schaltung, 
wobei  vor  dem  Verlöten  der  Bauteile 
auf  die  richtige  Polarität  speziell  der 
Dioden  und  der  Eikos  zu  achten  ist. 

Am  sichersten  ist  es,  die  Bauteile  Stück 
für  Stück  einzusetzen  und  zu  verbin¬ 
den.  Die  fertige  Platine  kann  in  einem 
Gehäuse  Ihrer  Wahl  untergebracht 
werden.  Das  Leistungs-IC  TDA  2030 
sollte  auf  jeden  Fall  gekühlt  werden; 
die  Anschlußbelegung  des  IC’s  ent¬ 
nehmen  Sie  bitte  Bild  2. 


Abgleich  der  fertigen  Schaltung: 

1 .  Spannung  anlegen;  es  sollte  ein  leich¬ 
tes  Brummen  im  Lautsprecher  ertö¬ 
nen. 

2.  Die  Potis  (22kOhm)  verdrehen,  bis 
kein  störendes  Brummen  mehr  im 
Lautsprecher  zu  hören  ist. 

3.  Den  Klinkenstecker  in  den  CPC  ein¬ 
stecken  und  Soundversuche  star¬ 
ten;  hierbei  letzte  Korrekturen  an 
den  Potis  vornehmen. 

Eine  gute  Sound-Demo  ist  der  ”Orgel- 

meister”  aus  Heft  10/85. 

Viel  Spaß  beim  Basteln  und  Hören! 

(M.  Stumpf/ME) 


BILD  2 

RNSCHLUESSE 
DES  T DR  2030 


LS 


7 '86  CPC  109 


II II IIHI  HIHIHI  HIHI  IIIIMHHIMIMmim  II  MIHI  IIHI II 


. Joyce1 


IIIIIIIIIHIHH' 


IHIIHHHHIIIH 


Fortsetzung  von  Seite  37 

Freak  stellte  sich  schon  auf  ein  stun¬ 
denlanges  Operieren  mit  umwan¬ 
deln,  PIP  und  HEXCOM  ein,  der  er¬ 
fahrenere  zauberte  jedoch  ein 
Programm  namens  KERMIT  aus  der 
Programmsammlung  hervor.  Dieses 
für  IBM-  und  Großrechner  ent¬ 
wickelte  Terminalprogramm  wurde 
für  das  CP/M-Betriebssystem  ange¬ 
paßt,  neu  assembliert,  in  das  HEX- 
Format  umgewandelt,  an  den  Joyce 
geschickt  und  dort  wieder  in  eine  Pro¬ 
grammdatei  umgewandelt.  Dies  dau¬ 
erte  zwar  über  eine  Stunde,  führte 
aber  auch  zu  einem  ersten  Erfolgser¬ 
lebnis:  die  Sache  funktionierte  näm¬ 
lich!!! 

Die  nächste  Stunde  war  der  Klärung 
der  Frage  gewidmet,  warum  der  Kon¬ 
takt  via  KERMIT  zwar  klappte,  die 
übertragenen  Dateien  jedoch  immer 
ungefähr  2  KByte  kürzer  als  die  Origi¬ 
naldateienwaren.  Das  Durchblättem 
einiger  hundert  Seiten  KERMIT- 
Dokumentation  zeigte  schließlich 
den  (eigentlich  unverzeihlichen) 
Fehler  der  Freaks:  man  kann  halt 
COM-Files  beim  besten  Willen  nicht 
im  ASCII-Format  übertragen!! 

Dafür  entdeckten  wir  aber  auch,  daß 
KERMIT  drei  Übertragungsprotokolle 
unterstützt,  die  eine  Ubertragungssi¬ 
cherheit  bis  zu  99,9  %  ermöglichen, 
was  dankend  angenommen  wurde. 
Naja,  von  da  an  war  eigentlich  alles 
nur  noch  ein  Kinderspiel: 

Mit  KERMIT  auf  beiden  Rechnern, 
einer  Baudrate  von  4800  und  Hand¬ 
shakeverbindung  lief  alles  ohne  Pro¬ 
bleme.  Der  Sender  tippte  SEND 
(FILENAME. EXT),  der  Empfänger 
einfach  RECEIVE  und  nach  einigen 
bis  mehreren  Minuten  waren  die  Da¬ 
ten  korrekt  übertragen.  Übertragungs¬ 
fehler  wurden  von  KERMIT  aufge¬ 
fangen,  wobei  auffiel,  daß  beim  Joyce 
als  Sender  die  Fehlerquote  wesent¬ 
lich  geringer  war  als  mit  dem  Joyce  als 
Empfänger.  Die  Schuldfrage  ließ  sich 
allerdings  noch  nicht  klären... 


Fazit 


Alles  in  allem  also  ein  gelungener  Tag. 
Die  Schnittstelle  hat  sich  in  der 
Praxis  bewährt,  die  Softwarelücke  für 
den  Joyce  ist  geschlossen.  Mit  den 
richtigen  Voraussetzungen,  die  im 
folgenden  Technikteil  aufgeführt 
sind,  kann  der  Joyce-Benutzer  nun 
richtig  "absahnen”  (bitte  nicht  mit 
"raubkopieren”  verwechseln).  Beson¬ 
ders  im  Bereich  der  Public  Domain 
Software  eröffnen  sich  neue  Quellen. 


Wenn  der  Partner  das  richtige  An¬ 
gebot  hat,  braucht  der  Joyceler  nur 
noch  Zeit  und  Disketten  und  die  Sa¬ 
che  ist  gelaufen.  Auch  urheberrecht¬ 
lich  geschützte  Software  ist  kein  Pro¬ 
blem:  der  Joyceler  kauft  sich  die  5  1/4”- 
Originale  und  läßt  sie  sich  auf  3" 
umkopieren. 

Das  einzige  Problem  ist  eventuell 
noch  die  Programmanpassung,  aber 
bei  "offizieller”  Software  ist  sowieso 
meist  ein  Installationsprogramm  da¬ 
bei.  Und  bei  Public  Domain  Software 
hat  der  Verfasser  gewiß  ein  Eisen  im 
Feuer. 

Noch  ein  Wink  mit  dem  Zeigefinger: 
bitte  beim  Programmtransfer  die 
urheberrechtlichen  Bestimmungen 
beachten,  damit  auf  dem  CP/M- 
Sektor  nicht  bald  Homecomputerzu¬ 
stände  herrschen!!! 


Technisches 


Aul  beiden  Seiten  die  BauPrat 


i  B,  >DEVIC£  S10Ä48000 

KERI11T  in  HE*  ver.indtln 

>  COMVERT  iCERMIT 

KERIUT. HEX  übertngen: 

>PIP  AUX : =KERMI T  HE*ÄHü  I  >P1P  KERMIT .  HEX : -au* :  ÄHÜ 

t  Dil  Option  AMu  ist  lehr  nichtig  !!l  t 
»enn  sith  Sender  nieder  »eldet 
CTRL  2  übertrigen: 


>EN0E 


Eipfänger 


richtig  emstellen; 


bei»  EepTinger  iuB  nun 
KERIIIT . HEX  vorhanden  sein, 
diese  wird  uigenndeit  pit. 


>HEXC0I1  KERMIT 
Aul  beiden  Seiten  luB  nun  KERMIT.COM  vorhanden  »ei 


(Aul  diese  Art  und  Heise  »innen  juch  indere  Progrme  übertrigen 
»erden,  Dabei  iuB  Jedoch  beichtet  »erden,  deB  PIP  »einen  Htndeheke 
unterstützt,  bei  längeren  Oiteien  können  also  Daten  verloren  gehen, 
«enn  euf  die  Oiskette  geechrieben  »ird, ) 


Hier  nochmals  die  Einzelheiten  des 
Transfers: 

OXXXX”  sind  mit  RETURN  abzu¬ 
schließende  Benutzereingaben,  das 
”>”  bitte  nicht  eingeben). 

Vorhanden  sein  müssen: 

1  JOYCE  mit  Schnittstelle 
1  CP/M-Rechner  mit  Schnittstelle 
1  Verbindungskabel  mit  Handshake¬ 
unterstützung 
Auf  mindestens  einer  Seite: 

-  Umwandlungsprogramm  von  COM- 
Dateien  in  HEX-Files  (kann  entfal¬ 
len,  wenn  auf  beiden  Seiten  KERMTT 
verfügbar  ist) 

-  Transferprogramm  KERMIT,  ange¬ 
paßt  für  CP/M 

-  Hilfsprogramm  zur  Erzeugung  von 
CTRL-Z 

-  zu  übertragende  Software 

-  eventuell  ein  williger  Mitarbeiter 
und  Spender 

-  Zeit... 

Die  einzelnen  Schritte: 

1.  Vorbereitung:  KERMIT  senden  (ent¬ 


fällt.  wenn  KERMIT  auf  beiden  Sei¬ 
ten  vorhanden)  siehe  Tabelle  1. 

2.  Transfer  via  KERMIT: 

-  KERMIT  erwartet,  daß  die  serielle 
Schnittstelle  bereits  richtig  ange¬ 
paßt  ist.  4800  Baud  haben  sich  als 
optimal  erwiesen. 

-  KERMIT  starten: 

>KERMIT 

-  wenn  sich  KERMIT  meldet,  die 
Parameter  setzen: 

>SET  FILE  BINARY 
>SET  BLOCK  3 

-  >HELP  ruft  eine  Hilfsseite  auf, 
die  Befehle  >DIR  und  >ERA 
können  wie  unter  CP/M  verwen¬ 
det  werden. 

-  Übertragung  starten: 

Sender:  >SEND  EILEN  AM.EX1 
Empfänger:  >RECEIVE 
Wildcards  können  wie  unter  CP/M 
gesetzt  werden: 

>SEND  *.*  sendet  ganze  Diskette 
>SEND  *.ASM  sendet  ASM-Da- 
teien 

Der  Programmname  wird  mit¬ 
übertragen,  braucht  also  beim 
Empfänger  nicht  mit  angegeben 
werden. 

KERMIT  startet  nun  die  Übertra¬ 
gung.  Auf  beiden  Seiten  sollten  jetzt 
die  Nummern  der  übertragenen 
Blöcke  angezeigt  werden. 
Übertragungsfehler  werden  mit  %x 
markiert,  der  Block  wird  nochmals 
übertragen.  Die  Übertragung  wird 
nur  bei  unbehebbaren  Störungen 
abgebrochen. 

Nach  der  Übertragung  meldet  sich 
KERMIT  wieder  mit  dem  Prompt. 
Mit  >DIR  Inhaltsverzeichnis  an¬ 
schauen: 

Wenn  die  übertragenen  Dateien  kür¬ 
zer  sind  als  die  Originale,  so  wurde 
>SET  FILE  BINARY  vergessen.  Die¬ 
ses  eingeben  und  Übertragung  neu 
starten. 

VORSICHT:  Der  angezeigte  freie 
Diskettenplatz  stimmt  nicht!!!!! 

Im  Notfall  Länge  der  Dateien  addieren; 
diese  ist  korrekt. 

Rechtzeitig  Disketten  wechseln  (nur 
formatierte  !!!) 

KERMIT  kann  mit  >EXIT  verlassen 
werden. 

Anmerkung  der  Redaktion: 

JOYCE-Anwender,  die  noch  Fragen 
oder  Probleme  haben,  können  sich 
schriftlich  an  uns  wenden  (DMV- 
Verlag,  Fuldaer  Str.  6, 3440  Eschwege) 
Wir  werden  Ihre  Fragen  an  den  Autor 
weiterleiten. 

Das  Public  Domain  Programm  KER¬ 
MIT  finden  Sie  auch  auf  der  Joyce- 
Databox  zu  dieser  Ausgabe. 

Viel  Spaß  und  Erfolg! 

(Michael  Anton/MC) 
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Fernsicht 

Nach  dem  ”Umsteigen”  vom  CPC  464  auf  den  PCW  8256 
Joyce  hatte  ich  anfangs  große  Probleme  mit  der  Anpas¬ 
sung  eines  für  den  CPC  entwickelten  und  auf  diesem  mit 
ausreichender  Rechengenauigkeit  laufenden  BASIC- 
Programmes.  Versuche,  die  in  BASIC  gebotene  Möglich¬ 
keit  der  Verwendung  doppelt  genauer  Zahlen  zu  nutzen, 
führten  zunächst  nicht  zu  befriedigenden  Ergebnissen,  da 
Mallard-BASIC  bei  den  meisten  arithmetischen  Funktio¬ 
nen  nur  einfach  genaue  Werte  liefert  und  die  Verwendung 
unterschiedlicher  Variablentypen  unter  Umständen  die 
Ungenauigkeit  noch  vergrößert. 

Die  Programmierung  von  Unterprogrammen  für  die  be¬ 
nötigten  Funktionen  in  Verbindung  mit  der  Verwendung 
doppelt  genauer  Zahlen  führte  zu  einer  Lösung  des  Pro¬ 
blems.  Eine  Anwendung  dieser  Unterprogramme  finden 
Sie  in  dem  Programm  "Fernsicht”,  das  als  Hilfe  für  die  Be¬ 
arbeitung  von  Bergfotos  gedacht  ist.  (Die  Idee  dazu  lag  für 
mich  als  passioniertem  Bergwanderer  natürlich  "in  der 
Luft".)  Bei  den  Unterprogrammen  handelt  es  sich  um  die 
Ermittlung  des  Sinus  ’o’  eines  Winkels  T  in  Rad.  (Zeilen 
1000  -  1070),  die  Ermittlung  des  Winkels  ’o'  in  Rad.  aus  Y 
(=ATN(i),  Zeilen  1080-  1 170)  und  Verbesserung  der  Wur¬ 
zelgenauigkeit  (Zeilen  1180-  1210).  Außerdem  finden  Sie 
auch  ein  paar  Unterprogramme  zur  Bildschirmsteuerung 
(Zeilen  110  -  200,  1220  -  1250.  1930  -  1940).  Die  Verwen¬ 
dung  dieser  Unterprogramme  und  die  nötigen  Variablen 
können  Sie  leicht  dem  dokumentierten  Listing  und  der 
darin  enthaltenen  Variablentabelle  (Zeilen  1360  -  1920) 
entnehmen. 

Wie  erwähnt,  ist  das  Programm  eine  Hilfe  für  die  Bearbei¬ 
tung  von  Bergfotos.  Dabei  ist  es  oft  schwierig,  die  sichtba¬ 
ren  Gipfel  und  andere  markante  Punkte  sicher  zu  bestim¬ 
men,  wenn  diese  in  größerer  Entfernung  liegen  und  die 
Sicht  vielleicht  durch  den  Einfluß  der  Erdkrümmung  und 
Refraktion  oder  durch  andere  Berge  behindert  werden 
könnte.  Wie  anhand  des  folgenden  Beispieles  zu  sehen  ist, 
liefert  "Fernsicht”  bei  realistischen  Eingabewerten  sehr 
zuverlässige  Informationen. 

Beispiel: 

Höhe  1  =  Standort  des  Fotografen: 

Üetliberg  bei  Zürich:  871.00  m 
Höhe  2  =  vermutl.  sichtbarer  Gipfel: 

Eiger  (Berner  Alpen):  3970.00  m 

Entfernung  Höhe  1  bis  Höhe  2  auf  Meereshöhe  lt. 
Landkarte:  ca.  92.00  km 

Frage  1: 

Verhindert  die  Erdkrümmung  die  Sicht  auf  den  Eiger? 
Nein,  sonst  würde  das  Programm  eine  entsprechende 
Nachricht  anzeigen. 

Frage  2: 

Versperrt  der  Pilatus  bei  Luzern  in  rd.  44  km  Entfernung 
die  Sicht  auf  den  Eiger? 

Nach  Eingabe  der  Entfernung  zum  Pilatus  (=  Höhe  3)  von 
44.00  km  wird  folgende  Information  angezeigt: 

Höhe  2  sichtbar,  wenn  Höhe  3  <  2205.39  m 
Der  Pilatus  (=  Höhe  3)  ist  nur  21 19.9  m  hoch,  also  kleiner 
als  2205.39  m,  so  daß  der  Eiger  deutlich  sichtbar  ist,  wenn 
keine  anderen  Berge  die  Sicht  behindern.  Dies  kann  durch 
die  Eingabe  weiterer  Entfernungen  zu  anderen  Bergen,  die 
”im  Weg  stehen”,  geprüft  werden.  Es  wird  also  angezeigt, 
wie  hoch  ein  "Hindernis”  maximal  sein  darf,  das  zwischen 
Standort  und  Ziclobjekt  liegt. 

Die  Entfernung  vom  Standort  (=  Höhe  1)  bis  zur  Höhe  3 
kann  auch  größer  als  die  Entfernung  zur  Höhe  2  sein.  In 
diesem  Fall  wird  die  notwendige  Höhe  dieses  Objektes  an¬ 
gezeigt,  um  hinter  der  Höhe  2  sichtbar  zu  sein. 


Unzulässig  sind  folgende  Eingaben: 

Höhen  <  0  m  oder  >  1E+16  m 
Entfernungen  <  0.001  km  oder  >  11  256.71  km 
Selbstverständlich  sind  damit  Eingaben  möglich,  die 
außerhalb  der  im  Aufgabenbereich  vorkommenden  Maße 
liegen.  Dies  ist  jedoch  sehr  nützlich,  weil  dadurch  die 
Grenzen  der  Genauigkeit  des  Programmes  sichtbar  ge¬ 
macht  werden  können,  indem  u.a. 

1.  als  "Entfernung  bis  Höhe  3”  0  km 
und 

2.  als  "Entfernung  bis  Höhe  3”  die  Entfernung  vom  Stand¬ 
ort  (Höhe  1)  bis  Höhe  2 

eingegeben  werden.  Die  angezeigten  Höhen  müßten 
zu  1.  mit  der  Höhe  des  Standortes  (Höhe  1) 
und 

zu  2.  mit  der  Höhe  2 

übereinstimmen.  Abweichungen  sind  auf  Rechenunge¬ 
nauigkeiten  zurückzuführen;  sie  treten  in  diesem 
Programm  jedoch  nur  bei  extremen  Eingabewerten  auf. 
Das  Programm  liefert  noch  weitere  Informationen,  die 
hier  jedoch  nicht  alle  geschildert  werden  sollen. 
Experimentieren  Sie  ein  wenig...  (Hans  Führer) 

70  1  Copyright  1966:  Hans  Führer,  Berg. Gladbach 

80  1  ============================================= 


90  *  Der  mittlere  Erd-Radius  wird  mit  6370  km  ange 
setzt.  Die  Wirkung  der 

100  '  Refraktion  wird  mit  einem  Mittelwert  von  1/8 
Erd-Radius  berücksichtigt. 

110  '  Standard-Darstellungsfeld  löschen,  Bildschir 
m-Kopf  und  -Fuß  füllen. 

120  zbs=90 : zhz=31 : zls=0 : zoz=0 : GOSUB  1230 : PRINT  STR 
ING£ <75, "_"):  PRINT  CHR$<27)"p“ 

130  PRINT  TAB <7 )" Fernsicht  unter  Berücksichtigung 
der  Erdkrümmung  und  Refraktion  " 

140  PRINT  CHR£  <27 ) " q" STR I NGS  <75 ,  "  > 

150  zbs=90:  zhz=l : zls=0: zoz=9: GOSUB  1230: PRINT  STRI 
NG$  <75 

160  zbs=50: zhz=4; zls=0: zoz=28: GOSUB  1230; PRINT  CHR 
£  <27 >  ;  **p"  j 

170  PRINT" Auswahl  *.l  ENTER*  für  neue  Höhe  1  <H. 1> 
usw,  " 

180  PRINT"  *.2  ENTER*  für  neue  Höhe  2  <H.2) 

usw.  " 

190  PRINT"  '.3  ENTER'  für  neue  Entfernung  H 

.  1  -  H.  2" 

200  PRINT"  *.4  ENTER*  für  Ende 

" ;  : PRINT  CHRS  <27  > ; " q" ; 

210  *  Doppelte  Genauigkeit  für  Speicher  *a*  -  * v* 
sowie  Speicherung  von  Konstanten 
220  DEFDBL  a-v: t=1000# : v=6370#*9#/8# 

230  i =3 : GOSUB  1190: k=o: pi=3. 141592653#+5. 8979324D- 
10: u=v*2#*pi 

240  *  Eingabe  der  Basisdaten  <H. 1,  H.2  und  Entfern 
ung  H. 1-H. 2> 

250  zbs=90 : zhz=l : zls=0 : zoz=5 : GOSUB  1230 

260  INPUT**  Höhe  1  <Standort>  in  m  " ; bl : b2=bl/ t+v:  w= 

bl: GOSUB  960 

270  IF  bl<0#  OR  bl>=lD+16  GOTO  260:  'extreme  Verte 
sind  unbrauchbar 

280  PRINT" Höhe  1  <H. 1  =  Standort TAB <54 ) USING"  # 
############### . ##  m"  ;  bl ; 

290  zbs=90: zhz=l: zls=0: zoz=6: GOSUB  1230 

300  INPUT"Höhe  2  <Ziel  oder  Hindernis)  in  m  "jcl:c 

2=cl/t+v: w=cl: GOSUB  960 

310  IF  cl<0#  OR  cl>=lD+16  GOTO  300:  'extreme  Werte 
sind  unbrauchbar 

320  PRINT" Höhe  2  <H.2  =  Ziel  oder  Hindernis) TAB 
<54 ) US ING" ################. ##  m"  ;  c 1 ; 

330  zbs=90; zhz=l : zls=0: zoz=8: GOSUB  1230 : PRINT: a5=0 
:a6=0:e5=0:'  PRINT  f . rieht . TAB- Pos . 

340  INPUT" Entfernung  von  H. 1  bis  H.2  auf  Meereshöh 
e  in  km  ";  al :  w=al :  GOSUB  960 

350  IF  al<0.001#  GOTO  330:  'Entfernungen  unter  1  m 
sind  unbrauchbar 

360  PRINT" Entfernung  von  H.  1  bis  H.2  <auf  Meereshö 
he) ; " ; TAB <65 > USING" #####, ##  km" ; al; 

370  '  Darstellungsfeld  zur  Kommentierung  der  Basis 
daten  bestimmen 

380  zbs=90: zhz=5: zls=0: zoz=10: GOSUB  1230 
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390  1  Prüfung,  ob  Entfernung  H.1-H.2  kleiner  als  u 
/ 4  (also  'el'  <90  Altgrad)  ist 
400  PRIKT: IF  al<u/4#  GOTO  450 

410  PRIKT" Eingegebene  Entfernung  H. 1  -  H. 2  =";TAB< 
54 ) US I KG" ################. ##  km"  ;  al; 

420  PRIKT"  ist  zu  groß ! ": PRINT" Bitte  K  e  u  e  i  n 
gäbe  " ; 

430  PRIKT" <  Erdumf ang/4  *9/8 (w/Refraktion)  =<  1125 
6. 71  km! "  :  GOTO  330 

440  '  Errechnung  div.  Winkel  (insbes.  el,  f2,  und 
g2>  sowie  der  Länge  a2 

450  el=al/v: hl=pi/2#-el/2#: IF  bl=cl  THEK  f2=hl:g2= 
hl : h2=pi— g2 : GOTO  490 

460  i=hl : GOSUB  1010: hsl=o:  i=l-hsl*hsl : GOSUB  1190 
470  hcl=o: htl=hsl/hcl: ht3=  <c2-b2) / <c2+b2)*htl:  'Ta 
ngenssatz,  ht3=tan ( (gamma— beta) /2) 

480  i=ht3: GOSUB  1090 : h3=o: g2=hl+h3 : h2=pi-g2 : f2=h2- 
el 

490  l=g2: GOSUB  1010: gs2=o: e9=h2-pi/2#: i=el : GOSUB  1 
010: esl=o: a2=l#/gs2*esl*c2 

500  '  Prüfung  Genauigkeit  <d3  aus  Sinussatz  bei  a3 
=al ) ,  Kommentierung  der  Basisdaten 

510  i=pi-el-g2: GOSUB  1010: f s3=a: d3= (l#/f s3*gs2*b2- 
v)*t:  IF  ABS <cl-d3> <5#/t  GOTO  550 

520  PRIKT" Eingegebene  Maße  sind  sehr  extrem 
i  deshalb  sind  die  nachfolgenden" 

530  PRIKT" B  erechnungen  dements 
prechend  ungenau!" 

540  PRIKT:  '  Prüfung,  ob  niedrigster  Punkt  entgegen 
gesetzt  zur  Blickrichtung  liegt 
550  IF  e9<0#  GOTO  780 

560  '  Prüfung,  ob  H.2  vor  dem  niedrigsten  Punkt  li 
egt 

570  a9=e9*v: d9= (b2*gs2-v)*t: IF  el<e9  GOTO  650 
580  *  Prüfung,  ab  Höhe  am  niedrigsten  Punkt  (wenn 
vor  H.2>  >  Meereshöhe 
590  IF  d9>  0#  GOTO  750 

600  *  Anzeige,  wenn  niedrigster  Punkt  vor  H.2  lieg 
t  und  unter  Meereshöhe  ist 

610  PRIKT" Bei  Entfernung  H. 1  bis  H.2  =" j TAB (64 > USI 
KG" ###### . ##  km"  :  a 1 

620  PRIKT" wird  die  Sicht  durch  den  Horizont  blocki 
ert ! " ; 


. . . . . . . . . . . . . . . . . . . . .  in 


630  PRIKT"  Bitte  Neueingabe  ! " : GOTO  33 
0 

640  '  Prüfung,  ob  Höhe  am  niedrigsten  Punkt  (wenn 
hinter  H.2)  >  Meereshöhe 
650  IF  d9>0#  GOTO  750 

660  '  Errechnung  der  Entfernung  'a6'  (bei  v  =Seite 
c  und  g2  =Winkel  gamma) 

670  fs7=gs2*b2/v: i=l#-fs7*fs7: GOSUB  1190: fc7=o: i=f 
s7/fc7: GOSUB  1090 

680  f 7=o: e7=pi-g2-f7: e6=e9- (e7-e9) : a6=e6*v 

690  '  Errechnung  Entfernung  'a5'  (bei  v  =Seite  c  u 

nd  pi/2  =Winkel  beta) 

700  ec5=v/b2 : i=l#-ec5*ec5 : GOSUB  1190: es5=o: i=es5/e 
c5: GOSUB  1090: e5=o: a5=e5*v 

710  1  Anzeige  der  Sicht  auf  Erdoberfläche  bis  Hori 
zont  (0  m  Höhe) 

720  PRIKT" Erdoberfläche  hinter  Höhe  2  sichtbar  von 
" ; TAB (49 ) US I KG" ##### .  ##  km" ; a6 ; 

730  PRINT"  bis  US I KG" #####. ##  km";a5;:GOTO  780 

740  '  Anzeige  des  niedrigsten  Punktes  der  Sichtlin 
ie  zwischen  H. 1  und  H.2 

750  PRIKT"Kiedrigster  Punkt  'Sichtlinie'  in  “ ; US 
I KG" ##### . ##  km" | a9 ; 

760  PRIKT"  bei  " j USING" ################.  ##  m  Höh 
e" ; d9 ; 

770  '  Darstellungsfeld  zur  Eingabe  und  Komme nt i er u 
ng  der  Höhe  3  bestimmen 

780  zbs=90 : zhz=ll :zls=0:zoz=16: GOSUB  1230;PRINT:' 
PRIKT  für  richtige  TAB-Pos. 

790  INPUT; "Entfernung  bis  Höhe  3  in  km" ; a3 : w=a3 : GO 
SUB  960: IF  a3>=0#  GOTO  810 

800  PRIKT  TAB(40)":  negative  Entfernung  unzulässig 
" : GOTO  790 

810  IF  a3<u/4#  GOTO  840 

820  PRIKT  TAB<40)" :  zu  weit,  da  >  Erdumfang/4  *9/8 
=  >  11256.71  km": GOTO  790 

830  '  Prüfung,  ob  Linien  H.1-H.2  und  Zentrum-H.  3  s 
ich  kreuzen  (wenn  g2+e3  <pi) 

840  e3=a3/v: f3=h2-e3: IF  f3<=0#  THEK  PRIKT  TAB(40>" 

:  H. 3  nicht  sichtbar" : GOTO  790 
850  IF  a5=0#  OR  a3<a6  GOTO  910 

860  IF  a3<=a5  THEN  PRIKT  TAB(40)":  H.3  ist  sichtba 
r" : GOTO  790 
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870  '  Errechnung  neuer  Verte,  wenn  Seite  ’a*  =Stre 
cke  H. 1  -  Horizont  0.0  m 

880  g5=pi/2#-e5: i=g5: GOSUB  1010: gs5=o: f3=pi-g5-e3: 
i=f3 : GOSUB  1010 

890  fs3=o: d4=l#/f s3*gs5*b2 : d3=  (d4-v)*t : GOTO  930 
900  *  Errechnung  der  Höhe  *d3'  mittels  Sinussatz 
910  i=f3: GOSUB  1010 : fs3=o: d4=l#/fs3*gs2*b2 : d3= (d4- 
v> *t : IF  al<a3  GOTO  930 

920  PRINT  TAB <40 ) " :  H.2  sichtbar,  wenn  H.3  <  " ; USI 

NG" ################. ##  m" ; d3 : GOTO  790 

930  PRINT  TAB <40 ) " :  H.3  sichtbar,  wenn  >  " ; USI 

NG" ################ . ##  m" j  d3 : GOTO  790 

940  GOSUB  1260: END 

950  '  Subroutine:  Prüfung,  ab  neue  Auswahl  erfolgt 
e 

960  IF  w=0. 1  GOTO  250 
970  IF  w=0 . 2  GOTO  290 
980  IF  w=0 . 3  GOTO  330 
990  IF  w=0 . 4  GOTO  940  ELSE  RETURN 

1000  '  Subroutine:  Ermittlung  des  SIN  *o'  eines  Wi 
nkels  RAD  1 i 1 

1010  IF  i>pi/2#  THEN  i=pi-i:  'da  sonst  Überlauf  in 
Reihenentwicklung 

1020  IF  i<-pi/2#  THEN  i=ABS(i)-pi:  'da  sonst  überl 
auf  in  Reihenentwicklung 
1030  m=l#:  n=l#:  q=i:  o=i 

1040  nFm+1#:  n=n*m:  m=m+l#:  n=n*m: q=q*i*i : r=o-q/n 
1050  m=m+l#:  n=n*m:  m=m+l#:  n=n*ra:  q=q*i*i  :  o=r+q/n 
1060  IF  oOr  GOTO  1040 
1070  RETURN 

1080  '  Subroutine:  Ermittlung  des  Winkels  'a'  in  R 
AD  =ATN  < i )  aus  '  i  ' 

1090  m=l#:  IF  ABS < i >  > 0 . 5  GOTO  1130:  *  da  Reihenentwi 
cklung  für  i  >=  1  unendlich  ist 
1100  q=i:o=i 

1110  m=m+2#: q=q*i*i : r=o-q/m: m=ra+2#:  q=q*i*i  :  o=r+q/m 
1120  IF  oOr  GOTO  1110  ELSE  1170 

1130  s=  <ABS <i )-k) / <ABS<i ) *k+l#) : q=s: o=s:  ' Verminde 
rung  des  ABS <TAN <i ) )  um  TAN(pi/3) 

1140  m=m+2#: q=q*s*s:  r=o-q/m: m=m+2#: q=q*s*s:  o=r+q/m 
1150  IF  oOr  GOTO  1140 

1160  IF  i>0#  THEN  o=o+pi/3  ELSE  o= <o+pi/3)*-l# 

1170  RETURN 

1180  '  Subroutine:  Verbesserung  der  Vurzelgenauigk 
eit  (für  o  =SQR<i> 

1190  o=SQR  <i ) 

1200  r=(i/o+o)/2#;o=(i/r+r)/2#:  IF  oOr  GOTO  1200 
1210  RETURN 

1220  '  Darstellungsfeld  bestiromen/löschen,  Cursor 
oben  links  <vgl.  CP/M  II 1/1-4) 

1230  zbs=zbs+31 : zhz=zhz+31 : zls=zls+32: zoz=zoz+32 
1240  PRINT  CHR$  (27)"  X"CHR$  (zoz)CHRS (zls)CHR$  <zhz)C 
HR$  <zbs) ; 

1250  PRINT  CHR1 <27 ) " E" CHRS  <27 ) " H" ;  :  RETURN 

1260  zbs=90 : zhz=32 : zls=0 : zoz=0 : GOSUB  1230:  * Subrou 

tine  für  Programm-Tests 

1270  PRINT"S  peicher-  Inhalt  :" 

1280  PRINT" al=" ; al, "a2=" ; a2, "a3=" ; a3, "a5=" ; a5, "a6= 
"  ;  a6, "a9=" ; a9 

1290  PRINT" bl=" ; bl, "b2=" ; b2, "cl=" ; cl,  "c2=" i c2,  "d3= 
'• ;  d3 .  "  d4="  ;  d4 ,  "  d9="  !  d9 

1300  PRINT"el=" ; el, "e3=" ; e3, "e5=" ;e5,"e6=" ;e6,"e7= 
" ; e7, "e9=" ; e9 

1310  PRINT" ec5=" ; ec5, "esl=" ; esl , ”es5=" ; es5, "f2=" ; f 
2 ,  " f 3=" ; f 3 , " f 7=" | f 7 

1320  PRINT" f  c7=" ; f c7 , " f s3=" ; f s3 , " f s7=" ; f s7 , ” g2=" ; g 
2 ,  “  g5="  ;  g5 ,  " gs2=" ; gs2 , " gs5=" ; gs5 

1330  PRINT“ hl=" ; hl, Mh2=" ; h2, "h3=" ; h3, "hcl=" ; hcl, "h 
sl=" ; hsl, "htl=" ; htl, "ht3="  ;  ht3 

1340  PRINT"  i="  ;  i,  "k="  ;  k,  "1="  ;  1,  "m="  ;  m,  "n="  ;  n,  "o="  ; 
o, "pi=" ; pi , " q=" : q, "r=" ; r,  "s="  ;  s 

1350  PRINT" t=" ; t , "u=" ; u , "v=" ; v, "w=" ; w, "zbs="  ;  zbs,  " 

zhz="  ;  zhz,  "zls=" ; zls, "zaz=" ; zoz: RETURN 

1360  '  Benutzte  Speicher  (Dreiecks-Seiten  a  =  'a.' 

,  b=  '  b.  '  ,  c=  ‘  c.  '  und  '  d,  ‘  ) 

1370  '  al  =Entfernung  H. 1  (Standort)  -  H.2  in  Mee 
reshöhe  in  km  lt. Eingabe  3 

1380  '  a2  =Entfernung  H. 1  (Standort)  -  H.2  in  ger 
ader  Linie  in  km 

1390  '  a3  =Entfernung  H. 1  (Standort)  -H.3  in  Mee 
reshöhe  in  km  lt. Eingabe 

1400  '  a5  =Entfernung  H. 1  -  Horizont  0,0  m  in  Mee 
reshöhe  in  km 

1410  '  a6  ^Entfernung  H.l  -  1.  Schnittpunkt  Meere 
shöhe  in  Meereshöhe  in  km 

1420  ’  a9  =Entfernung  H.l  -  niedrigster  Punkt  in 
Meereshöhe  in  km 

1430  '  bl  =Höhe  1  (Standort)  in  m  über  Meereshöhe 
lt.  Eingabe  1 


1440  '  b2  =Höhe  1  (Standort)  in  km  ab  Kreiszentru 
m  (=bl/1000+s) 

1450  '  cl  =Höhe  2  (Ziel  oder  Hindernis)  in  m  über 
Meereshöhe  lt.  Eingabe  2 

1460  '  o2  =Höhe  2  (Ziel  oder  Hindernis)  in  km  ab 
Kreiszentrum  (=cl/1000+s) 

1470  '  d3  =Höhe  der  Sichtlinie  in  m  über  Meereshö 
he  am  Punkt  H.3  (a3> 

1480  '  d4  =Höhe  der  Sichtlinie  in  km  ab  Kreiszent 
rum  am  Punkt  H.3  (a3) 

1490  '  d9  =Höhe  der  Linie  in  m  über  Meereshöhe  am 
niedrigsten  Punkt  (a9> 

1500  '  e.  =Winkel  alpha  <=  im  Erdzentrum)  in  RAD 
(Bogenmaß ) 

1510  '  el  =Winkel  alpha  für  Entfernung  H.l  -  H.2 
(a2  ) 

1520  '  e3  =Winkel  alpha  für  Entfernung  H.l  -  H.3 
(Gerade  zu  a3) 

1530  *  e5  =Winkel  alpha  für  Entfernung  H. 1  -  Hori 
zont  0,0  m  (Gerade  zu  a5) 

1540  '  e6  =Winkel  alpha  für  Entfernung  H. 1  -  1.  S 
chnittpunkt  Meereshöhe 

1550  *  e7  =Winkel  alpha  für  Entfernung  H. 1  -  2.  S 
chnittpunkt  Meereshöhe 

1560  *  e9  =Vinkel  alpha  für  Entfernung  H. 1  -  nied 
rlgster  Punkt  (Gerade  zu  a9) 

1570  '  ec.  =COS  Winkel  alpha  'e. ' ,  z.B.  'ec5'  =COS 
(e5 ) 

1580  '  es.  =SIN  Winkel  alpha  'e.',  z.B.  'esl*  =SIN 
(el) 

1590  '  f.  =Vinkel  beta  in  RAD  (Bogenmaß) 

1600  '  f 2  =Winkel  beta  an  H.2 

1610  '  f 3  = Winkel  beta  an  H.3 

1620  '  f7  =Winkel  beta  am  2.  Schnittpunkt  Meeresh 

öhe 


1630  1 

fc. 

=COS 

Winkel 

beta 

’  f .  • 

,  z.B. 

•  f  c7  ’ 

=COS( 

f  7) 

1640  1 

f  s. 

=SIN 

Winkel 

beta 

•  f .  • 

,  z.B. 

1  f  s3 ' 

=SIN  ( 

f  3) 

1650  '  g.  =Winkel  gamma  (am  Standort)  in  RAD  (Bog 
enmaß ) 

1660  '  g2  =Winkel  gamma  am  Standort  bei  Entfernun 
g  H. 1  -  H. 2  (a2> 

1670  1  g5  =Vinkel  gamma  am  Standort  bei  Entfernun 
g  H. 1  -  Horizont  0.0  m 

1680  '  gs.  =SIN  Winkel  gamma  ’g.',  Z.B.  '  gs2 '  =SIN 
(g2 ) 

1690  '  h.  =Hilfswerte  für  Winkel-  und  Längenberec 
hnungen 

1700  '  hl  =Hälfte  der  Summe  (Winkel  gamma  g2  und 
beta  f 2)  (=pi/2-el/2) 

1710  ‘  h2  =Summe  der  Winkel  alpha  el  und  beta  f2 
(=pi-g2) 

1720  1  h3  =atn(ht3)  =Hälfte  der  Differenz  der  Win 
kel  gamma  g2  und  beta  f2  (=(g2-f2)/2) 

1730  '  hc.  =COS  Winkel  *h.',  z.B.  'hcl'  =COS(hl) 

1740  *  hs.  =SIN  Vinkel  'h.',  z.B.  'hsl'  =SIN(hl) 

1750  '  ht.  =TAN  Winkel  ’h. *,  z.B.  'ht3‘  =TAN<h3> 

1760  '  i  =Eingangswert  für  Subroutinen 

1770  '  k  = Wurzel  aus  3  =TAN(pi/3) 

1780  '  m  =Faktor  in  Subroutinen 

1790  *  n  ^Fakultät  in  Subroutinen 

1800  '  o  =Ergebnis  aus  Subroutinen 

1810  '  pi  ^Verhältnis  Kreis-Umfang  zu  -Durchmesse 

r 

[  =Zwischenspeicher  1  in  Subroutinen 
=Zwischenspeicher  2  in  Subroutinen 
5  =Zwischenspeicher  3  in  Subroutinen 
:  =1000  (für  Umrechnung  in  m  und  umgekehr 


1820  '  q 
1830  '  r 
1840  '  s 
1850  '  t 
t) 

1860  '  u 
1870  '  v 


=Kreisumfang  zu  Radius  '  v' 

=Radius  in  km  (mittlerer  Erdradius  6370 
*  Ref raktionsfaktor (9/8) ) 

1880  '  w  =Variable  für  Auswahl -Abfrage 

1890  '  zbs  =Breite  = Anzahl  Bildschirm-Spalten 

1900  *  zhz  =Höhe  =Anzahl  Bildschirm- Zeilen 

1910  '  zls  =linke  Begrenzungs-Spalte 

1920  '  zoz  =obere  Begrenzungs-Zeile 

1930  '  Standard- Darstellungsfeld  bestimmen/ löschen 

,  Cursor  oben  links 

1940  zbs=90: zhz=32: zls=0: zoz=0: GOSUB  1230: END 
1950  '  Programm-Andruck  (Rand  4,  Elite  12  Z.p.Zoll 
,  endlos,  72  Zeilen,  5  Zeilen  frei) 

1960  LPRINT  CHR$ (27  > " 1" CHR$ (4 )CHR$ (27) " M"CHRS (27 ) " 
c"  ; 

1970  LPRINT  CHR* <27>"C"CHR$ (72 )CHR$ (27 ) " N"CHR$ <5 ) ; 
: LLIST 

1980  '  Programm-Sicherung  (Stand  29.03.86) 

1990  SAVE  "FERN": END 
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CPC-Listingservice 
für  464-664-6 128 

Wie  in  jedem  Heft,  finden  Sie  auch  hier  wieder  den 
Listingservice,  der  Ihnen  helfen  soll,  die  in  unserem  Ma¬ 
gazin  abgedruckte  ”Paperware"  in  "Software”  für  Ihren 
Rechner  zu  verwandeln.  Neben  den  Piktogrammen  für 
Kassetten-/Diskettenbetrieb  und  der  Angabe  der  Lauffä¬ 
higkeit  finden  Sie  die  Super-Eintipphilfe  "Checksummer”. 
Um  den  Checksummer  benutzen  zu  können,  genügt  es, 
das  Programm  einmal  aufzurufen;  es  generiert  selb¬ 
ständig  den  Maschinencode,  aktiviert  den  Checksummer, 
gibt  eine  Bereitschaftsmeldung  aus  und  löscht  sich  an¬ 
schließend  selbst  wieder.  Ab  jetzt  wird  jede  Eingabe,  nach¬ 
dem  man  ENTER  gedrückt  hat,  mit  der  Ausgabe  einer 
Quersumme  quittiert  Beim  Eintippen  von  Programmli- 
stings  kann  man  nun  durch  den  Vergleich  der  beiden  in 
eckigen  Klammern  stehenden  Zahlen  feststellen,  ob  man 


sich  vertippt  hat  und  ggf.  den  Fehler  sofort  berichtigen. 
Des  weiteren  hat  man  die  Möglichkeit,  mit  dem  RSX- 
Befehl  CHECK, s,z  ein  Listing  mit  den  dazugehörigen 
Checksummen  zu  erzeugen.  Die  Parameter  s  und  z  defi¬ 
nieren  den  Ausgabekanal  (s  =  0  bis  9)  und  die  Zeilennum¬ 
mer,  ab  der  mit  der  Ausgabe  begonnen  werden  soll;  wird  z 
nicht  angegeben,  so  wird  an  dessen  Stelle  1  ange¬ 
nommen. 

Vor  dem  Druck  sollte  man  mit  WTDTH  x  die  maximale 
Breite  (x)  einer  Zeile  festlegen.  Mit  Hilfe  der  RSX-Befehle 
ON  und  OFF  kann  der  Cheksummer  ein-  bzw.  ausgeschal¬ 
tet  werden. 

Bei  der  Berechnung  der  Quersumme  werden  die  Zeilen¬ 
nummer  und  Leerzeichen  überlesen;  zwischen  Groß-  und 
Kleinschreibung  wird  nur  innerhalb  zweier  Anführungs¬ 
striche  unterschieden,  da  ansonsten  die  Schreibweise  von 
Befehlsworten  und  Variablennamen  keinen  Einfluß  auf 
die  Funktionstüchtigkeit  eines  Basicprogrammes  hat. 

(Thomas  Fippl) 


100  REM  •••  CHECKSUM  464  **» 

110  MEMORY  &A4FF 

120  FOR  a%=&A500  TO  &A607 

130  READ  by te$ 

140  POKE  a%,VAL("&"+byte$) 

150  NEXT 
160  PRINT 

170  PRINT"CHECKSÜM  v2" 

180  CALL  &A500: ION: NEW 
190  : 

200  DATA  21 ,09,a5,01 ,0d,a5,c3,d1 
210  DATA  bc,00,00,00,00,18,a5,c3 
220  DATA  2a,a5,c3,2f ra5,c3,43,a5 
230  DATA  4f ,ce,4f , 46 , c6 , 43 , 48 , 45 
240  DATA  43,cb,00,00,cf,98,aa,c3 
250  DATA  a8,a5,21 , 27 ,a5 , 1 8 , 03 , 21 
260  DATA  24,a5,28,06,cd,00,b9,c3 
270  DATA  06, dd, 11 ,3a, bd, 01 ,03,00 
280  DATA  ed,b0,c9,4f ,cd,00,b9,0d 
290  DATA  28,08,0d,20,ea,dd,7e,02 
300  DATA  18, 04, 7b, 11 ,01  ,00, cd, a2 
310  DATA  cl ,cd,a3,e7,e5,4e,23,46 
320  DATA  23, 5e, 23, 56, ei ,78, bl ,c8 
330  DATA  cd, 3c,c4,e5,09,e3,cd, 63 
340  DATA  ei , 21 ,a4 ,ac,cd, 7a,a5 ,e1 
350  DATA  18,e2,e5,cd,ba,a5,e3,cd 
360  DATA  98,a5,cd,96,f2,e3,cd,f6 
370  DATA  a5,cd,4e,c3,e1 ,7e,a7,c8 
380  DATA  cd,98,a5,cd,4e,c3,18,f5 
390  DATA  3a,24,ac,d6,08,47,7e,a7 
400  DATA  c8, cd, 45, ei ,23,10 ,f7,c9 
410  DATA  cd,24,a5,f 5,c5,d5,e5,cd 
420  DATA  ba,a5,cd,f6,a5,e1 ,d1 ,c1 
430  DATA  fl ,c9,eb,1b,af ,47,67,6f 
440  DATA  2f,32,23,a5,13,1a,d6,30 
450  DATA  38,04,fe,0a,38,f6,1a,13 
460  DATA  a7,c8,4f ,3a,23,a5,a1 ,fe 
470  DATA  20, 28, f3, 79, fe, 22, 20, 07 
480  DATA  3a,23,a5,2f,32,23,a5,3a 
490  DATA  23,a5,a7,79,c4,8a,ff,4f 
500  DATA  ad,07,6f ,09,18, d8,3e, 20 
510  DATA  cd,5c,c3,3e,5b,cd,5c,c3 
520  DATA  cd,79,ee,3e,5d,c3,5c,c3 


100  REM  ***  CHECKSUM  664  ••• 

110  MEMORY  &A4FF 

120  FOR  a%=&A500  TO  &A607 

130  READ  by te$ 

140  POKE  a%,VAL("8"+byte$) 

1 50  NEXT 
160  PRINT 

170  PRINT"CHECKSUM  v2" 

180  CALL  &A500: |ON:NEW 
190  : 

200  DATA  21 ,09,a5,01 ,0d,a5,c3,d1 
210  DATA  bc,00,00,00,00,18,a5,c3 
220  DATA  2a ,a5 ,c3 , 2f  ,a5 ,c3 , 43 , a5 
230  DATA  4f ,ce,4f , 46 ,c6 , 43 , 48 , 45 
240  DATA  43, cb, 00, 00, cf ,02,ac,c3 
250  DATA  a8,a5,21 ,27,a5,18,03,21 
260  DATA  24,a5,28,06,cd,00,b9,c3 
270  DATA  4c, cb, 11 ,5b, bd, 01 ,03,00 
280  DATA  ed,b0,c9,4f ,cd,00,b9,0d 
290  DATA  28 , 08 ,0d , 20 ,ea ,dd , 7e, 02 
300  DATA  18, 04, 7b, 11 ,01 ,00, cd, a9 
310  DATA  cl ,cd ,69 ,e8 ,e5 , 4e, 23 , 46 
320  DATA  23, 5e, 23, 56, ei ,78, bl, c8 
330  DATA  cd,75,c4,e5,09,e3,cd,59 
340  DATA  e2 ,21 , 8a ,ac,cd, 7a , a5 ,e1 
350  DATA  1 8,e2,e5,cd,ba,a5,e3,cd 
360  DATA  98 ,a5 ,cd, 58 , f 3, e3 ,cd, f 6 
370  DATA  a5 ,cd, 9b,c3 ,e1 , 7e,a7 ,c8 
380  DATA  cd, 98  ,a5  ,cd ,  9.b  ,c3 , 1  8  ,  f  5 
390  DATA  3a,09,ac,d6,08,47,7e,a7 
400  DATA  c8,cd,22,e2,23,10,f7,c9 
410  DATA  cd,24,a5,f 5,c5,d5,e5,cd 
420  DATA  ba,a5,cd,f6,a5,e1 ,d1 ,c1 
430  DATA  f 1 ,c9,eb,1 b,af , 47 , 67 ,6f 
440  DATA  2f ,32,23, a5, 13,1a, d6, 30 
450  DATA  38,04,fe,0a,38,f6,1a,13 
460  DATA  a7,c8,4f ,3a,23,a5,a1 ,fe 
470  DATA  20, 28, f3, 79, fe, 22, 20, 07 
480  DATA  3a,23,a5,2f  ,32,23,a5,3a 
490  DATA  23,a5,a7,79,c4,ab,ff ,4f 
500  DATA  ad, 07 , 6f ,09 , 1 8 ,d8 , 3e , 20 
510  DATA  cd,a3,c3, 3e,5b,cd,a3,c3 
520  DATA  cd,49,ef ,3e,5d,c3,a3,c3 


100 
110 
120 
130 
1  40 
1  50 
160 
170 
180 
190 
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210 
220 
230 
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250 
260 
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300 
310 
320 
330 
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380 
390 
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REM  CHECKSUM  6128  *** 
MEMORY  &A4FF 
FOR  a%=&A500  TO  &A607 
READ  byte$ 

POKE  a% ,VAL( "&"+byte$ ) 

NEXT 

PRINT 

PRINT" CHECKSUM  v2" 

CALL  &A500: |ON:NEW 

DATA  21  ,09,a5,01 ,0d,a5,c3,d1 
DATA  bc, 00 , 00 ,00 , 00 , 1 8, a5 ,c3 
DATA  2a,a5,c3,2f ,a5,c3,43,a5 
DATA  4f ,ce,4f , 46 , c6 , 43 , 48 , 45 
DATA  43, cb, 00, 00, cf ,02,ac,c3 
DATA  a8,a5,21 , 27 , a5 , 1 8 , 03 , 21 
DATA  24,a5,28,06,cd,00,b9,c3 
DATA  49,cb,11 ,5e,bd,01 ,03,00 
DATA  ed,b0,c9 ,4f ,cd,00,b9,0d 
DATA  28,08,0d,20,ea,dd,7e,02 
DATA  18, 04, 7b, 11 ,01  ,00, cd, a6 
DATA  cl ,cd , 64 ,e8 ,e5 , 4e, 23 , 46 
DATA  23, 5e, 23, 56, ei ,78, bl ,c8 
DATA  cd,72,c4,e5,09,e3,cd,54 
DATA  e2,21 ,8a,ac,cd,7a,a5,e1 
DATA  1 8 ,e2,e5 ,cd, ba ,a5 ,e3 ,cd 
DATA  98,a5,cd,53,f3,e3,cd,f6 
DATA  a5,cd, 98,c3,e1 ,7e,a7,c8 
DATA  cd,98,a5,cd,98,c3,18,f5 
DATA  3a,09,ac,d6,08,47,7e,a7 
DATA  c8,cd,1d,e2,23,10,f7,c9 
DATA  cd,24,a5,f 5,c5,d5,e5,cd 
DATA  ba ,a5 ,cd, f 6,a5 ,e1 ,d1  ,c1 
DATA  f 1 ,c9,eb,1b,af ,47,67,6f 
DATA  2f ,32,23, a5,1 3,1a, d6, 30 
DATA  38,04,fe,0a,38,f6,1a,13 
DATA  a7,c8,4f ,3a,23,a5,a1 ,fe 
DATA  20, 28, f3, 79, fe, 22, 20, 07 
DATA  3a,23,a5,2f ,32,23,a5,3a 
DATA  23,a5,a7,79,c4,ab,ff ,4f 
DATA  ad,07,6f ,09,18 ,d8,3e,20 
DATA  cd,aO,c3,3e,5b,cd,aO,c3 
DATA  cd,44,ef ,3e,5d,c3,a0,c3 
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Referenzkarte:  Calls  &  Pokes 

ln  der  Referenzkarte  dieses  Monats  geht  es  um  wichtige  Einsprünge  in  das  MC-Paket  des  CPC. 

Alle  Routinen,  die  hier  zu  finden  sind,  bearbeiten  direkt  die  Hardware-Register  ihres  Rechners.  V  on  den  Rou¬ 
tinen  für  die  V ordergrundprogramme  sollte  ein  Anfänger  lieber  die  Finger  lassen,  da  ein  Call  nach  einer  solchen 
Adresse  sicherlich  nie  mehr  zurückkommt. 

Interessant  sind  dagegen  die  Routinen  für  Videochip  und  Centronics-Port.  Die  Einsprünge  sind  unproblematisch 
und  erlauben  eine  bequeme  Handhabung  dieser  Bereiche. 

Es  ist  zu  empfehlen,  sich  vor  dem  Arbeiten  mjt  Bildschirmoffsets  erst  einmal  ein  Datenblatt  des  Videochips 
HD  6845S  anzusehen  und  sich  so  vor  bösen  Überraschungen  zu  schützen. 


Adresse  Syntax 


&BD13 

&BD16 

&BD19 

&BD1C 

&BD1F 

&BD22 

&BD25 


&BD28 

&BD2B 

&BD2E 


Einsprung:  HL  =  Adresse  Programm 
Aussprung:  Nicht  möglich 
Einsprung:  HL  =  Adresse  Programm 
C  =  ROM-Select 
Aussprung:  Nicht  möglich 
Einsprung:  Keine  Bedingung 
Aussprung:  Keine  Änderungen 
Einsprung:  A  =  Mode. 

Aussprung:  AF  zerstört. 

Einsprung:  A  —  Screenbase  (neu) 

HL  =  Bildschirmabstand 
(neu) 

Aussprung:  AF  zerstört 
Einsprung:  DE  =  Ink  Vektor 
( Byte  0  =  Border) 

(Byte  1  =  Paper) 
Aussprung:  AF  zerstört 
Einsprung:  DE  =  Ink  Vektor 
(Byte  0  =  Border) 

(Byte  1  =  InkO) 

(...) 

(Byte  16  =  Ink  15) 
Aussprung:  AF  zerstört 
Einsprung:  Keine  Bedingung 
Aussprung:  AF.  BC.  DE,  HL  zerstört 
Einsprung:  A  —  Zeichen 
Aussprung:  Richtig  gesendet: 

Carry  =  ON 
Timeout:  Carry  —  OFF 
Immer:  A  zerstört 
Einsprung:  Keine  Bedingung 
Aussprung:  Busy:  Carry  =  ON 
Ready  to  send: 

Carry  =  OFF 
Immer:  Flags  zerstört 


Bemerkung 

Laden  und  Starten  eines  Programms. 

Starten  eines  Vordergrund- 
Programms. 

Warten  auf  Bildschirm  rucklauf 
(Frame  bei  664.  6128). 

Setze  Bildschirmmode  (0.1.2). 

Bildschirmoffset  setzen. 


Alle  Inks  auf  eine  Farbe  setzen. 


Einzelne  Farben  für  Inks  setzen 


Indireciion  für  MC  WAIT_PRIN- 
TFR  einrichten. 

Zeichen  an  Centronics-Port  senden 
(Bit  7  ignorded). 


Untersuche,  ob  Centronics-Port 
aktiv  ist. 
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Sie  haben  eine  Idee  für  ein  neues  Pro¬ 
gramm?  Gut!  Sie  haben  das  Wissen,  um 
die  Idee  in  ein  Programm  umzusetzen? 
Spitze!  Aber  Sie  wissen  nicht,  wie  Sie 
Ihr  Programm  so  benutzerfreundlich 
wie  möglich  gestalten?  Dann  lesen  Sie 
doch  einfach  diesen  Bericht! 


Natürlich  kann  Ihnen  dieser  Bericht 
nicht  dabei  helfen,  eine  neue  Anwen¬ 
dung  zu  finden,  die  Sie  dann  in  einem 
Programm  verwerten  könnten.  Das 
müßten  Sie  schon  selber  erledigen. 
Hierzu  möchten  wir  uns  auf  einige 
Tips  beschränken. 

1.  Ihr  Programm  sollte  für  einen 
größeren  Personenkreis  interes¬ 
sant  sein. 

2.  Die  Anwendung  sollte  so  gelagert 
sein,  daß  eine  Verwendung  von 
Bleistift  und  Papier  nicht  doch  die 


und  Untermenues  versehen  ist,  ist 
einfach  in  der  Anwendung,  verhin¬ 
dert  Fehler  und  macht  den  Ablauf  für 
den  Benutzer  übersichtlich. 

Warum  also  sollten  wir  unser 
Programm  nicht  menuegesteuert  auf¬ 
bauen?  Sie  haben  nichts  dagegen? 
Okay,  wie  soll  das  Menue  nun  ausse- 
hen  und  aufgebaut  sein? 

Da  ein  Menue  vergleichbar  ist  mit 
dem  Inhaltsverzeichnis  eines  Buches 
oder  einer  Speisekarte,  und  uns  somit 
die  Auswahl  eines  bestimmten  Pro¬ 
grammteiles  bietet,  sollte  es  so  über¬ 
sichtlich  sein  wie  nur  irgend  möglich, 
um  eventuelle  Fehler  zu  verhindern. 
Zu  dieser  Übersichtlichkeit  gehört  es 
auch,  daß  nicht  zu  viele  Punkte  in 
einem  Menue  auftauchen.  Dies  errei¬ 
chen  Sie  durch  Verzweigungen  der 
einzelnen  Punkte  in  Untermenues. 
Ein  Beispiel  zu  Haupt-  und  Unter¬ 
menues  {s.  Bild  1). 


sticksteuerung  empfiehlt  sich  jedoch 
nur,  wenn  auch  im  Programm  selber 
ein  Joystick  Verwendung  findet.  Das 
Anschließen  eines  Joysticks  nur  zur 
Menuesteuerung  ist  jedoch  ein  Zeit- 
und  Arbeitsaufwand,  den  Sie  sich 
sparen  können. 

Als  wissenschaftlich  erwiesen  kann 
wohl  angesehen  werden,  daß  bei 
dauernden  Wiederholungen  die 
Konzentration  nachläßt  und  Ent¬ 
scheidungen  aus  dem  Unterbe¬ 
wußtsein  getroffen  werden.  Dies  gilt 
es  natürlich  zu  verhindern,  denn 
unterbewußte  Entscheidungen  füh¬ 
ren  leicht  zu  Fehlern. 

Um  Fehler  und  ein  Verirren  im 
Programm  zu  verhindern,  gibt  es 
mehrere  Möglichkeiten. 

Die  wohl  beste  Methode,  die  Auf¬ 
merksamkeit  immer  wieder  zu 
wecken,  ist  wohl  ein  ständiger  Wech¬ 
sel  von  Farben,  Tönen  und  dem  gra- 


Programmieren  -  aber  richtig! 


günstigere  und  schnellere  Lösung 
ist. 

3.  Vor  Erstellung  eines  Programms 
sollten  Sie  sich  von  einem  beste¬ 
henden  Bedarf  hierfür  überzeu¬ 
gen. 

An  diesen  drei  Punkten  können  Sie 
schon  erkennen,  daß  wir  uns  hier  aus¬ 
schließlich  mit  professionellen  und 
semiprofessionellen  Anwendungs¬ 
programmen  beschäftigen  wollen. 
Gerade  deshalb  ist  die  Benutzerfreund¬ 
lichkeit  solcher  Programme  immens 
wichtig.  Denn  der  Personenkreis,  der 
diese  Programme  hauptsächlich  be¬ 
nutzt,  legt  Wert  auf  eine  schnelle  und 
einfache  Anwendung,  die  keine  große 
Kenntnis  einer  Computersprache 
voraussetzt. 

Sind  Sie  sich  nun  über  den  Inhalt 
Ihres  Programmes  im  klaren,  können 
wir  uns  diesem  Problem  der  Benut¬ 
zerfreundlichkeit  widmen. 

Der  allgemeine  Trend  zu  menuege- 
steuerten  Programmen  ist  nicht  zu 
übersehen  und  generell  sehr  zu 
begrüßen. 

Ein  Programm,  welches  mit  Haupt- 


Wie  Sie  an  Punkt  0  des  Untermenues 
erkennen  können,  sollten  Sie  immer 
einen  Rückweg  ins  Hauptmenue 
offen  lassen. 

Des  weiteren  sollte  sich  die  Ar¬ 
beitsweise  des  Menues  selbst  erklä¬ 
ren.  Das  kann  z.B.  am  Schluß  des  Me¬ 
nues  in  einem  INPUT-Befehl 
geschehen! 

100  INPUT  ”WähIen  Sie  durch  Ein¬ 
gabe  der  Kennziffer”;wa 

Dieser  Befehl  hat  den  Nachteil,  daß 
die  eingegebene  Ziffer  durch  einen 
Druck  der  (Enter)-Taste  bestätigt 
werden  muß. 

Dies  läßt  sich  durch  die  Verwendung 
des  INKEYS-Befehls  umgehen.  Eine 
genaue  Erklärung  der  Anwendung 
dieses  Befehls  können  Sie  dem  Hand¬ 
buch  Ihres  Schneider  CPC  entneh¬ 
men. 

Durch  diese  INPUT-  oder  INKEYS- 
Kommandos  erfolgt  also  die  Steue¬ 
rung  durch  die  Menues.  Eine  weitere 
Möglichkeit  der  Steuerung  bietet  der 
Einsatz  eines  Joysticks.  Diese  Joy- 


phischen  Aufbau  der  einzelnen  Me¬ 
nues.  Aber  Vorsicht!  Wie  bei  vielen 
anderen,  so  hat  auch  hier  eine  Über¬ 
dosierung  dieser  Zutaten  meist  das 
Gegenteil  des  gewünschten  Effektes 
zur  Folge.  Also  übertreiben  Sie  es 
nicht  und  machen  aus  einem 
Büroprogramm  kein  Musical  mit 
Lightshow. 

Sehr  hilfreich  und  empfehlenswert 
wäre  es,  im  ersten,  also  im  Haupt¬ 
menue  auch  eine  kurze  Erläuterung 
des  Programmes  anzubieten,  denn 
wer  schaut  schon  gerne  andauernd 
im  Handbuch  nach. 

Zum  Schluß  unseres  Berichtes  kom¬ 
men  wir  noch  zu  der  Möglichkeit, 
einen  Listschutz  einzubauen.  Die  im 
Handbuch  angegebene  Möglichkeit 
ist  wohl  grundsätzlich  gut,  es  müssen 
jedoch  noch  einige  Zusätze  gemacht 
werden,  um  diesen  Listschutz  sicher 
zu  machen. 

Als  erstes  sollte  die  (ESC)-Taste  ge¬ 
sperrt  oder  anderweitig  belegt  wer¬ 
den.  Um  die  Eingabe  des  LIST- 
Befehls  nach  einer  Fehleingabe  zu 
verhindern,  ist  der  Einbau  eines  ON 
ERROR  GOTO-Kommandos  sinn¬ 
voll. 

Alle  wichtigen  Punkte  konnten  wir 
hier  wohl  nicht  ansprechen,  dazu  ist 
das  Thema  einfach  zu  umfangreich. 
Doch  wir  hoffen,  daß  wir  Ihnen 
einige  wertvolle  Tips  geben  konn¬ 
ten. 

(R.  Nitsche) 


Hauptmenue 

Untermenue  Bauteile 

1.  Bauteile 

1.  Widerstand 

2.  Berechnungen  und  Formeln 

2.  Kondensator 

3.  Schaltungsbeispiele 

3.  Transistor 

4.  Diode 

Bild  1 

0.  Zurück  ins  Hauptmenue 
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INTERN 
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EIN  DATA  BECKER  BUCH 

II 

Ein  Muß  für  jeden,  der  sich  professionell 
mif  dem  CPC  6128  oder  dem  CPC  664 
beschäftigt.  Einführung  in  das  System,  den 
Prozessor,  das  Gate  Array,  den  Video-Con¬ 
troller,  den  Schnittsfeilenbaustein  8255, 
den  Soundchip,  die  Schnittstellen.  Mit  Dis¬ 
assembler  und  ausführlichen  Kommenta¬ 
ren  zu  den  Routinen  von  Interpreter  und 
Betriebssystem.  Ein  Superbuch,  wie  alle 
Titel  der  INTERN-Reihe! 

CPC  6128/664  Intern 
456  Selten,  DM  69,- 


Eine  Sprache,  die  immer  beliebter  wird  ist 
LOGO.  LOGO  ist  einfach  zu  erlernen,  aber 
vielseitig  in  der  Programmierung.  Das  Buch 
befaßt  sich  unter  anderem  mit  folgenden 
Themen;  Rechnen  mit  LOGO,  Grafikpro¬ 
grammierung,  Wörter-  und  Listenverarbei¬ 
tung,  Prozeduren,  Rekursionen,  Sortierrouti¬ 
nen,  Maskengenerator,  Dafenstrukfuren 
und  Künstliche  Intelligenz. 

Das  große  LOGO-Buch  zum  CPC 
ca.  300  Selten,  DM  39,- 
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Alles  über  Floppyprogrommierung  vom  Ein¬ 
steiger  bis  zum  Profi.  Natürlich  mit  ausführ¬ 
lichem  ROM-i_i$tjnn  einer  äußerst  komfor¬ 
tablen  Dateiverwaftung,  einem  hilfreichen 
Disk-Monitor  und  einem  ausgesprochen 
nützlichen  Disk-Manager.  Dazu  eine  Fund¬ 
grube  verschiedener  Programme  und  Hilfs¬ 
routinen,  die  das  Buch  für  jeden  Floppy- 
Anwender  zur  Pflichtlektüre  machen! 

Das  große  Floppy-Buch  zum  CPC 
422  Seiten,  DM  49,- 


Woilen  Sie  in  BASIC  wie  ein  Profi  program¬ 
mieren?  Dieses  Buch  macht  es  Ihnen 
leicht.  Themenbereiche;  Variablen,  Zahlen¬ 
systeme,  Bits  und  Bytes,  Tokens.  String¬ 
bearbeitung,  Sortierung  Laufschrift,  selbst¬ 
definierte  Zeichen,  Windows,  Rundungen, 
Fehlerbearbeitung,  Kopierschutz,  Grafiken, 
Joystick,  Soundprogrammierung  relative 
Dateien  u.v.m.  Viele  Beispielprogramme  fin¬ 
den  Sie  in  den  entsprechenden  Kapiteln, 
Das  große  BASIC-Buch  zum  6128 
ca.  300  Seilen,  DM  39,- 
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CP/M 

TRAININGSBUCH 

ZUM 


Endlich  CP/M  beherrschen!  Von  grundsätz¬ 
lichen  Erklärungen  zu  Speicherung  von 
Zahlen,  Schreibschutz  oder  ASCII,  Schnitt¬ 
stellen  und  Anwendung  von  CP/M-Hilfspro- 
grammen.  Für  Fortgeschrittene:  Fremde 
Diskettenformate  lesen.  Erstellen  von  Sub- 
mit-Dafelen  u.v.m.  Dieses  Buch  berücksich¬ 
tigt  die  Versionen  CP/M  2.2  und  3.0  für 
Schneider  464,  664  und  6128. 

Das  CP/M4talningsbuch  zum  CPC 
260  Seiten,  DM  49,- 


für  Einsteiger 
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Dieses  Buch  führt  Sie  Schritt  für  Schritt  in 
die  Benutzung  des  Joyce  ein.  Diese  Einfüh¬ 
rung  geht  von  der  insiuiiaiion  der  Geräte 
über  eine  Einleitung  in  LocoScripf  bis  hin 
zur  Programmerstellung  In  den  Program¬ 
miersprachen  BASIC  und  LOGO.  Auch  die 
Programmierung  unter  dem  Betriebssystem 
CP/M  3.0  wird  leicht  verständlich  beschrie¬ 
ben.  Der  Ideale  Einstieg  mit  dem  Joyce! 
Joyce  für  Einsteiger 
248  Seiten,  DM  29,- 
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DFÜ  für  Jedermann  mif  dem  CPC  bietet 
eine  ausführliche  und  verständliche  Einfüh¬ 
rung  in  das  Gebiet  der  Datenfernübertra¬ 
gung:  was  ist  DFÜ,  BTX  DATEX  Matlbox. 
Alles  über  Modems  und  Koppler.  Begriffs¬ 
erklärung:  Originate,  Answer,  Half-Duplex 
usw.  Eine  serielle  Schnittstelle  am  CPC,  RS 
232/V.24  simuliert,  Mailboxsoftware  - 
selbstgestrickt,  Postbestimmungen  u.v.m. 
Steigen  Sie  mit  diesem  Buch  In  die  Welt 
der  Datennetze  und  Datenfernübertragung 
ein.  DFÜ  für  Jedermann  zum  CPC 
303  Seiten,  DM  40,- 
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Buch 
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Dieses  Buch  beschreib!  umfassend  die 
Benutzung  der  Textverarbeitung  Loco- 
Script,  das  Betriebssystem  CP/M  und  die 
Anwendung  von  Programmen  wie  Multi¬ 
plan,  Wordstar  und  dBase,  wichtige 
Mallard-BASIC-Routinen  wie  Menü-  und 
Maskengenerator.  Sortierverfahren  und 
rekursive  Grafikprogrammierung 
in  LOGO! 

Das  große  Joyce-Buch 
ca.  350  Seiten,  DM  59.- 


Der  2.  Band  CPC  Tips  &  Tricks  ist  für  alle 
CPC  Besitzer  interessant.  Ob  sie  nun  einen 
464, 664  oder  6128  besitzen!  Aus  dem 
Inhalt:  Menuegenerator,  Maskengenerator, 
BASIC-Befehlserweiterungen,  Programmier¬ 
hilfen  wie  Dump,  BASiC-Zeile  von  BASIC 
aus  erzeugen,  wichtige  System  roufinen  und 
deren  Nutzung,  Beschleunigung  von  Pro¬ 
grammen  u.v.m.  Wer  noch  mehr  über  sei¬ 
nen  CPC  wissen  will,  der  kommt  an  diesem 
Buch  nicht  vorbei! 

CPC  Tips  &  Tricks  Band  il 
250  Seiten,  DM  39,- 


Von  den  Grundlagen  der  Maschinen¬ 
spracheprogrammierung  über  die  Arbeits¬ 
weise  des  Z80  Prozessors  und  einer 
genauen  Beschreibung  seiner  Befehle  bis 
zur  Benutzung  von  System  roufinen  ist  alles 
ausführlich  und  mit  vielen  Beispielen 
erklärt.  Im  Buch  enthalten  sind  Assembler, 
Disassembler,  Einzelschritt-Simulator  und 
Monitor  als  komplette  Anwenderpro¬ 
gramme.  So  wird  der  Einstieg  in  die 
Maschinensprache  leichfgemacht. 

Das  Maschinensprachebuch  zum  CPC 
320  Seiten,  DM  39, - 


Spezieil  für  den  Hobbyelektroniker,  der 
mehr  aus  seinem  CPC  machen  möchte! 

Von  nützlichen  Tips  zur  Plafinenherstellung 
über  Adreßdecodierung,  Adapterkarfen  und 
Interfaces  bis  zu  EPROM-Programmier- 
board  und  -Programmiernetzfeil  oder 
Motorsfeuerung  für  Gleich-  und  Schritf- 
schaltmotoren  werden  machbare  Erweite¬ 
rungen  ausführlich  und  praxisnah 
beschrieben.  Am  besten  gleich  anfangen! 
CPC  Hardware-Erweiterungen 
445  Seiten,  DM  49,- 

Und  wo  informieren  sich  CPC ■ 
Anwender  über  News  & 
Trends,  neue  Software, 
neue  Computer  und  aktuelle 
Tips  ä  Tricks?  In  der 
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Wo  denn  sonst! 
DATA  WELT  7  8/86 
ab  23.  Juni 
am  Kiosk. 


In  diesem  Teil  unseres  Kurses  werden 
wir  uns  weiterhin  mit  dem  Befehlssatz 
des  Z-80  befassen,  so  daß  Sie  wirklich 
die  Auswirkungen  aller  regulären  Be¬ 
fehle  in  unseren  Heften  nachschlagen 
können. 

Rotations-  und  Schiebebefehle: 

Bei  allen  Rotations-  und  Schie¬ 
bebefehlen  werden  die  einzelnen  Bits 
innerhalb  eines  Bytes  verändert. 
Rotationsbefehle  beginnen  grund¬ 
sätzlich  mit  einem  ”R”;  Schie¬ 
bebefehle  dagegen  mit  einem  ”S”, 

Schiebebefehle: 

Beim  Schieben  wird  der  Inhalt  eines 
Registers  um  eine  Stelle  nach  links 
oder  rechts  geschoben.  Das  Bit,  das 
herausfällt,  kommt  in  das  Carryflag, 
und  das  Bit,  das  hereinkommt,  ist 
eine  Null.  Es  gibt  allerdings  eine 
Ausnahme: 

Das  arithmetische  Rechtsschieben: 
Wenn  man  mit  negativen  Zahlen  in 
der  Darstellung  als  Zweierkomple¬ 
ment  rechnet,  dann  ist  das  linke  Bit 
das  Vorzeichenbit.  Bei  negativen 
Zahlen  ist  dies  dann  eine  ”1”.  Divi¬ 
diert  man  eine  negative  Zahl  durch  2, 
indem  man  nach  rechts  schiebt  (siehe 
Schaubild  2),  so  sollte  das  Ergebnis 
negativ  bleiben.  Dies  macht  der  Be¬ 
fehl  ”SRA”  (schiebe  rechts  arithme¬ 
tisch).  Bei  diesem  arithmetischen 
Rechtsschieben  ist  das  Bit,  das  links 
hereinkommt,  identisch  mit  dem 
Vorzeichenbit.  Es  ist  eine  Null,  wenn 
die  Zahl  positiv  ist,  und  eine  Eins, 
wenn  die  Zahl  negativ  ist. 


Bsp.: 

0001  1100  =  28 
0000  1110  =  14 

T 

Nach  Ausführung  von  SRA 


Schaubild  2:  Rechtsschieben  ist  Division  durch  2 

Rotationsbefehle: 

Eine  Rotation  unterscheidet  sich  vom 
Schieben  dadurch,  daß  das  herein¬ 
kommende  Bit  entweder  das  ist,  was 
auf  der  anderen  Seite  herausfällt, 
oder  das  Carry.  Außerdem  unter¬ 
scheidet  man  noch  die  8-Bit-  und  die 
9-Bit- Rotation: 

Zur  besseren  Erklärung  schauen  Sie 


sich  bitte  Schaubild  1  an: 

Doch  nun  zur  Erklärung  der  mögli¬ 
chen  Befehle: 

RLCA 

Der  Inhalt  des  Akkumulators  wird 
um  eine  Bitposition  nach  links  ro¬ 
tiert.  Bit  0  kommt  nach  Bit  1,  Bit  1 
nach  Bit  2  usw.  Der  Inhalt  von  Bit  7 
kommt  sowohl  in  das  Bit  0  als  auch 
ins  Carry-Flag.  Eine  typische  8-Bit- 
Rotation.  Die  Ausführung  dauert  vier 
Taktzyklen  -  ein  sehr  schneller  Be¬ 
fehl  also. 

RLA 

Dies  ist  etwa  der  gleiche  Befehl,  mit 
dem  Unterschied,  daß  hier  eine  9-Bit- 
Rotation  zum  Einsatz  kommt.  Die 
Ausführung  dauert  ebenfalls  vier 
Taktzyklen. 

RRCA 

Der  Inhalt  des  Akkus  wird  um  eine 
Bitposition  nach  rechts  rotiert.  Bit  7 
kommt  nach  Bit  6,  Bit  6  kommt  nach 
Bit  5  etc.  Der  Inhalt  von  Bit  0  kommt 
sowohl  ins  Bit  7  als  auch  ins  Carry- 
Flag. 

Es  ist  also  genau  die  Umkehrung  des 
Befehls  ”RLCA”.  Ausführungszeit: 
vier  Taktzyklen. 

RRA 

Dies  ist  die  Rechtsrotation  zum  RLA- 
Befehl.  Auch  hier  werden  9  Bits  ro¬ 
tiert.  Ausführungszeit  ebenfalls  vier 
Taktzyklen. 

Zwischenbemerkung: 

Wie  Sie  vielleicht  schon  bemerkt  ha¬ 
ben,  ähneln  sich  die  Namen  der  Be¬ 
fehle.  So  bedeutet  der  zweite  Buch¬ 
stabe  (entweder  R  oder  L)  die  Rota¬ 
tionsrichtung.  Da  die  Befehle  anson¬ 
sten  gleiche  Wirkung  und  gleiche  Aus¬ 
führungszeit  haben,  werde  ich  in  Zu¬ 
kunft  nur  noch  die  rechtsro¬ 
tierenden  Befehle  erklären. 


8-Bit-Rotationen 


RRC  r  (RLC  r) 

Die  Wirkung  dieses  Befehls  entspricht 
etwa  dem  RRCA-Befehl. 

Allerdings  muß  hier  das  zu  rotierende 
Register  angegeben  werden.  Die  Aus¬ 
führungszeit  dauert  mit  acht  Takt¬ 


zyklen  doppelt  so  lang. 

Folgende  Register  r  können  benutzt 
werden:  A,  B,  C,  D,  E,  H,  L. 

RRC  [HLJ  (RLC  [HL]) 

Der  Inhalt  des  Doppelregisters  HL 
wird  als  Adresse  interpretiert.  Die 
Speicherstelle  mit  dieser  Adresse 
wird  rotiert.  Die  Ausführungszeit 
steigt  auf  15  Taktzyklen. 

RRC  [IX+d]  (RLC  [IX+d]) 

Der  Einbytewert  d  wird  zum  Inhalt 
des  IX-Registers  addiert.  Dieser  Wert 
wird  als  Adresse  benutzt.  Die  dazuge¬ 
hörende  Speicherstelle  wird  einer  8- 
Bit-Rotation  mit  Carry  unterzogen. 
Die  Ausführungszeit  erhöht  sich  wei¬ 
ter  auf  23  Taktzyklen. 

RRC  [IY+d]  (RLC  [IY+d]) 

Dieser  Befehl  funktioniert  genauso, 
wie  der  vorhergehende;  allerdings 
mit  dem  IY-Registcr. 


9-Bit-Rotationen 


RR  r  (RL  r) 

Der  Inhalt  des  Registers  r  (möglich 
sind:  A,  B,  C,  D,  E,  H  und  L)  wird  ge¬ 
meinsam  mit  dem  Carry  rotiert  Bit  7 
nach  Bit  6,  Bit  6  nach  Bit  5, ... ,  Bit  0  ins 
Carry,  Carry  nach  Bit  7.  Die  Aus¬ 
führungszeit  beträgt  8  Taktzyklen. 
Bei  den  8-Bit-Rotationen  kam  Bit  0 
ins  Carry  und  nach  Bit  7.  Beachten 
Sie  deshalb  die  unterschiedlichen 
Wirkungen.  Ein  Geschwindigkeits¬ 
vorteil  ergibt  sich  jedoch  dadurch 
nicht. 

RR  [HL]  (RL  [HL]) 

Der  Inhalt  der  Speicherstelle,  die 
durch  HL  adressiert  ist,  wird  mit  dem 
Carry  rotiert.  Die  Ausführungszeit 
beträgt  15  Taktzyklen. 

RR  [IX+d]  (RL  [IX+d]) 

Der  in  dem  Doppelregister  IX  vor¬ 
handene  Wert  wird  zu  d  (eine  8-Bit- 
Zahl)  addiert.  Dieser  Wert  wird  als 
Adresse  eines  Bytes  interpretiert. 
Dessen  Wert  wird  mit  dem  Carry  ro¬ 
tiert.  Die  Ausführungszeit  beträgt  23 
Taktzyklen. 

RR  [IY+d]  (RL  [IY+d]) 

Es  gilt  das  gleiche  wie  bei  RR  [IX+d], 
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Kurse 
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mit  dem  Unterschied,  daß  anstatt  IX 
IY  als  Indexregister  benutzt  wird.  Die 
Ausführung  dauert  natürlich  eben¬ 
falls  23  Taktzyklen. 

Zu  Beginn  dieses  Kurses  erwähnte 
ich,  daß  es  beim  Rotieren  auch  Aus¬ 
nahmen  gäbe.  Die  angesprochenen 
Befehle  sind  spezielle  Kommandos 
zum  Rotieren  von  BCD-Ziffern 
(Rotation  nicht  um  ein,  sondern  um 
vier  Bits). 

RRD  (RLD) 

Dieser  Befehl  (rotiere  rechts  dezimal) 
ist  etwas  komplizierter  als  die  zuvor¬ 
genannten  Rotationsbefehle:  Die  vier 
oberen  Bits  der  Speicherstelle,  die 
durch  den  Inhalt  von  HL  adressiert 
wird,  werden  in  die  unteren  Bits  der 
gleichen  Stelle  verschoben.  Die  vier 
unteren  Bits  kommen  in  die  vier  unte¬ 
ren  Bits  des  Akkus.  Die  vier  unteren 
Bits  des  Akkus  kommen  nicht  etwa  in 
die  vier  oberen  Bits  des  Akkumula¬ 
tors,  sondern  in  die  vier  oberen  Bits 
der  ursprünglich  festgelegten  Spei¬ 
cherstelle.  All  diese  Operationen  wer¬ 
den  gleichzeitig  ausgeführt.  Beachten 
Sie,  daß  die  vier  höherwertigeren  Bits 
des  A-Registers  nicht  verändert  wer¬ 
den.  Die  Ausführung  dauert  trotz 
einer  solchen  Komplexität  nur  18  Takt¬ 
zyklen.  und  dies  obwohl  auf  den  Spei- 


Schaubild  1:  Erklärung  8-  und  9-Bit-Rotation 
eher  und  auf  den  Akku  zugegriffen 
wird. 

Schiebebefehle: 

SRA  r  (SLA  r) 

Der  Inhalt  des  angegebenen  Regi¬ 
sters  (möglich  sind  A,  B,  C,  D,  E,  H 
und  L)  wird  arithmetisch  nach  rechts 
verschoben:  Bit  7  nach  Bit  6.  Bit  6 
nach  Bit  5, ... ,  BitO  ins  Carry.  Das  Bit 7 
bleibt  unverändert  (siehe  Bemerkung 
oben).  Die  Ausführungszeit  beträgt 
8  Taktzyklen. 

SRA  [HL]  (SLA  [HL]) 

Der  Inhalt,  der  durch  HL  adressier¬ 
ten  Speicherstelle,  wird  arithmetisch 
um  eine  Bitposition  geschoben.  Die 
Ausführungszeit  beträgt  15  Taktzyk¬ 
len. 


SRA  [IX+d]  (SLA  [IX+d]) 

Der  Inhalt  von  IX,  addiert  mit  d  (im 
Zweierkomplement),  wird  als  Spei¬ 
cheradresse  interpretiert.  Der  Inhalt 
des  Operanden  wird  arithmetisch 
verschoben.  Die  Ausführungszeit  be¬ 
trägt,  genau  wie  bei  den  indizierten 
Rotationsbefehlen,  23  Taktzyklen. 

SRA  [IY+d]  (SLA  [IY+d]) 

Funktionsweise  genau  wie  vorher,  al¬ 
lerdings  ist  das  benutzte  Index  das 
Doppelregister  IY. 

Im  nächsten  Teil,  es  wird  der  letzte 
sein,  werden  noch  die  Befehle  zur 
Einzelbitverarbeitung,  die  CPU- 
Steuerbefehle,  die  Sprungbefehle 
und  die  Ein-  und  Ausgabebefehle  er¬ 
klärt  werden.  (HF) 
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COSTA  CAPERS 


und  hier  weitere 
Spltzen-Spiele: 


Zu  den  Abbildungen 


Art.-Nr.  TIM  Vir 

188  C  Costa  Capers  29 

189  C  Runestone  29, 

191  C  The  Way  ot  the  Tiger  29, 
331  D  The  Way  of  the  Tiger  45, 

193  C  PingPong  29 

192  C  Movie  29. 

195  C  Batman  29 

199  C  Theysolda  Million  (2)  ?9, 

194  C  Strike  Force  Harrier  29 

333  D  Strike  Force  Harrier  49, 
187  C  Spindizzy  29 

355  D  Spindizzy  49 


Art.-Nr.  Tllil  Verfc.  Preis 

166  C  Bombjack  25-  39.— 

327  D  Bombjack  39-  49- 

167  C  Commando  29.  39,- 

328  D  Commando  45-  55- 

184  C  Saboteur  29-  39- 

185  C  Turbo  Esprit  29,  39,- 

186  C  Fairlight  29,-  39- 

190  C  Thing  on  a  Spring  29,  39- 

196  C  Doomsday  Blues  29-  39- 

197  C  Monopoly  39,  49- 

332  D  Monopoly  49,-  59- 

222  C  Bounder  29,-  39-  , 

357  D  Bounder  39,-  49- 

198  C  Get  Dexter  29.-39- 

200  C  Alien  Highway  29,-  39- 

201  C  Moon  Cresta  29,-  39 — 

356  D  Cluedo  49-  59- 

Schwarze  Preise:  Verkaufspreise  für  Nicht-Clubmitglieder 
Rote  Preise:  nur  für  Clubmitgliederl 


C  =  Cassette 
D  =  3  "-Diskette 
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Data  Media  Mailorder  und 


^  Computerclub 

Bestellen  Sie  noch  heute,  Lieferung  erfolgt  umgehend!  Zah¬ 
lung  per  Vorkasse  oder  Nachnahme  zuzügl.  Porto-  bzw.  Nach¬ 
nahmegebühr  (Nachnahme  ins  Ausland  Ist  nicht  möglich). 

\Weitere  Artikel  in  unserem  Club*  oder  Mailorderkatalog.  Bitte  anfordern  (2.-  DM  für  Rückporto  beilegen) 
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Der  Data  Media 

COMPUTERCLUB 

Jetzt  gibt  es  eine  neuartige  Möglichkeit  zum  besonders  günstigen  Einkauf:  Den  Computerclub! 

SOFTWARE  -  HARDWARE  -  BÜCHER  -  PERIPHERIE  -  ZUBEHÖR 

für  die  Computersysteme 

...  Schneider  -  Commodore  -  Atari  -  MSX  ... 

Umsonst  ist  der  Tod...  aber  für  den  Jahresbeitrag  von  nur  60,-  DM  erhalten  Sie  als  Leistungen: 

-  die  Möglichkeit,  von  den  besonders  preiswerten  Einkaufsmöglichkeiten  des  Computerclubs  Gebrauch  zu  machen, 
so  oft  Sie  wollen;  entweder  durch  Bestellung  aus  den  Angeboten  des  Clubkataloges  oder  durch  direkten 
Einkauf  in  den  Club-Zentren  (das  Netz  wird  ständig  erweitert). 

Die  Clubkarte  im  Scheckformat,  die  Sie  als  Clubmitglied  ausweist,  erhalten  Sie  nach  Zahlung  des  Jahresbei¬ 
trages. 

-  ein  Kaufzwang  oder  eine  bestimmte  Kaufverpflichtung  pro  Quartal  besteht  NICHT)!  Sie  allein  bestimmen,  wie 
oft  Sie  von  den  Angeboten  Gebrauch  machen  wollen. 

-  pro  Quartal  senden  wir  Ihnen  den  umfangreichen  Clubkatalog  kostenlos  zu,  der  ständig  durch  zusätzliche 
Informationen  über  Neuerscheinungen  und  weitere  Sonderangebote  ergänzt  wird. 

-  Fachberatung  in  den  Club-Zentren  oder  über  den  Telefonservice  für  Clubmitglieder  über  die  Rufnummer 
(02  31)  12  50  71  bis  12  50  73,  in  der  Zeit  von  14-17  Uhr. 

DATA  MEDIA  Computerclub-Zentren  gibt  es  ab  1.  Mai  1986  in: 

1000  Berlin  44,  Einser  Str.  22 
4600  Dortmund,  Ruhrallee  55 

Geplant  sind  in  Kürze:  Hamburg,  Frankfurt,  München,  Stuttgart 

Zum  Beispiel  3  Top-Angebote  für  die  Schneider  CPC’s: 


THE  RAMJAM  CORPORATION 

PRESENTS 


ariola  & 


mmi 


ariola  Sk 


Panzadrome,  C.  nur  16,90  DM  für  Clubmitglieder 
(für  Nichtmitglieder  21,90  DM) 


Think,  C.  nur  16,90  DM  für  Clubmitglieder 
(für  Nichtmitglieder  21,90  DM) 


Kaiser,  C.  nur  14,90  DM  für  Clubmitglieder 
(für  Nichtmitglieder  19,90  DM) 

Wie  wird  man  Clubmitglied? 

Die  Beitrittserklärung  kann  mittels  der  Postkarte  (im  Innenteil  dieser  Zeitschrift)  geschehen. 

Falls  Sie  vorher  zusätzliche  Informationen  und  den  Clubkatalog  wünschen,  bitte  anfordern  (DM  2,-  für  Porto 
beifügen): 


Data  Media  Computerclub 

Data  Media  GmbH,  Ruhralle  SS,  4000  Dortmund 
Tel.:  (02  31)  12  50  71-3 

Beispiele  für  unsere  Clubpreise  finden  Sie  auf  den  übrigen 
DATA  MEDIA  Werbeseiten! 

Bestellkarte  benutzen! 


Wer  kennt  sie  nicht,  die  magischen 
Quadrate,  die  uns  bei  zahllosen  Intelli¬ 
genztests  und  Kurzrätseln  immer  wieder 
begegnen.  Im  folgenden  wollen  wir 
Ihnen  zwei  Methoden  vorstellen,  wie  Sie 
diese  Problemstellungen  mit  Hilfe  Ihres 
Schneider  CPC  auf  Anhieb  lösen  kön¬ 
nen. 


Bildung  magischer  Quadrate 
mit  ungerader  Feldzahl 


Zunächst  kurz  zur  Problematik:  Ein 


magisches  Quadrat  beinhaltet  immer 
eine  konstante  Summe,  d.h.  beim  Bil¬ 
den  der  Quersumme  einer  Zahlen¬ 
reihe  kommt  immer  das  gleiche  Er¬ 
gebnis  heraus.  Dies  sowohl  waage¬ 
recht,  senkrecht  als  auch  diagonal 
(siehe  Bild  1). 


Magisches 

Quadrat 

8 

15 

17 

24 

1 

22 

4 

6 

13 

20 

11 

18 

25 

2 

9 

5 

7 

14 

16 

23 

19 

21 

3 

10 

12 

Am  Beispiel  eines  Quadrats  mit  5*5 
Feldern  wollen  wir  Ihnen  kurz  die 
Methode  vorstellen. 

Zunächst  werden  zwei  Hilfsquadrate 
dimensioniert  In  das  erste  werden 
fünfmal  die  Zahlen  von  1  -  5  geschrie¬ 
ben,  in  das  Zweite  die  Vielfachen  von 
5  -  also  0, 5, 10, 15  und  20.  Nun  werden 


. . . 


im  Hilfsquadrat  die  Zahlen  zyklisch 
umgeschrieben.  Man  fängt  bei  einer 
beliebigen  Zahl  von  1  -  5  zu  zählen  an 
und  überspringt  dabei  entweder 
keine  Zahl,  eine  Zahl,  zwei  Zahlen 
usw.,  so  daß  Zyklen  erster  bis  vierter 
Ordnung  entstehen.  Es  muß  darauf 
geachtet  werden,  daß  die  Zyklenord¬ 
nung  in  den  horizontalen  und  verti¬ 
kalen  Reihen  unterschiedlich  ist. 
Ebenso  verfährt  man  im  zweiten 
Hilfsquadrat.  Wichtig  ist  ebenfalls, 
daß  gleichen  Zahlen  aus  dem  ersten 
Hilfsquadrat  verschiedene  Zahlen 
im  zweiten  Hilfsquadrat  gegenüber¬ 
stehen.  So  muß  z.B.  der  fünfmal  vor¬ 
kommenden  1  jedesmal  eine  andere 
Zahl  aus  dem  zweiten  Hilfsquadrat 
zugeordnet  werden,  etc. 

Nach  dem  Umschreiben  werden  nun 
beide  Hilfsquadrate  miteinander  ad¬ 
diert,  man  erhält  ein  magisches 
Quadrat  mit  den  Zahlen  1  -  25! 

Auf  diese  Weise  läßt  sich  eine  Viel¬ 
zahl  von  magischen  Quadraten  mit 
5*5  Feldern  bzw.  Quadrate  mit  einer 
anderen  ungeraden  Felderzahl  bil¬ 
den. 

Die  konstante  Summe  der  horizonta- 
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Listing  1 


80  '  Eingabe  der  Feldzahl  <ungerade>  [2156] 

90  1 - - -  [1611  ] 

100  MODE  2 : BORDER  1:INK  0,1:INK  1,24: INPUT  [5941] 
"Anzahl  der  Felder  einer  Reihe?  ",anz 
110  DIM  gual (anz ,anz ) ,qua2 (anz,anz )  [2757] 

120  '  [117] 

130  1  Zuweisung  der  Variblen  fuer  das  1 .Hi  [2055] 
lf squadrat 

140  *  -  [2321  ] 


150  FOR  y=1  TO  anz  [1305] 

160  IF  yd  THEN  u=INT(RND*anz ) +1  [2294] 

170  IF  y >1  THEN  u=qua1  (y-1 , 1  ) -1  [1698] 

180  IF  u=0  THEN  u=anz  [429] 

190  FOR  xd  TO  anz  [1064] 

200  quäl  (y,x)=u:u=»u+2:IF  u»anz  THEN  u=u-an  [3843] 

z 

210  NEXT  x,y  1548] 

212  1  [117] 

214  '  Zuweisung  der  Variblen  fuer  das  2. Hi  [3149] 

lfsquadrat 

216  '  -  [2321  ] 


220  z=0  :z1  d  :  z2=0  :z3d  [1893] 

230  FOR  yd  TO  anz  [1305] 

240  FOR  xd  TO  anz  [1064] 

250  IF  quäl (y,x)=z1  AND  y=1  AND  z3d  THEN  [3365] 
spalte=x 

260  IF  quäl  (y,x)=z1  THEN  qua2  (y , x )  =z '•anz : z  [3544] 
=z+1 

270  IF  { z *anz ) >(anz •  (anz-1 ) )  THEN  z=0  [1117] 

280  NEXT  x,y  [548] 

290  IF  spalte<anz  THEN  spalte=spalte+1 :GOT  [2645] 
O  310 

300  IF  spalte=anz  THEN  spalted  [1699] 

310  z2=z2+1 :z=z2:z3=z3+1 :z1=qua1 (1 »spalte)  [2052] 
320  IF  z3  <=anz  THEN  230  [1995] 

330  •  [117] 

340  1  Ausdruck  der  Hilfsquadrate  1  und  2  [1197] 

350  *  -  [1785] 

360  LOCATE  1,1: PRINT"  1 . Hilf squadrat  [1842] 

II 

370  FOR  yd  TO  anz  [1305] 

380  FOR  xd  TO  anz  [1064] 


390  PRINT  USING"###";qua1 (y,x) ;  [1397] 

400  NEXT  x: PRINT :NEXT  y  [1443] 

410  z=(anz*3)+5  [1349] 

420  LOCATE  z  +  1 ,1  : PRINT" 2. Hi lfsquadrat"  [17351 

430  FOR  yd  TO  anz  [1305] 

440  FOR  xd  TO  anz  [1064] 

450  LOCATE  z,y+1:PRINT  USING"  W\*qua2  (y ,  [2568] 

x) ; 

460  z=z+3  [700] 

470  NEXT  x:z=(anz*3)+5:PRINT:NEXT  y  [1744] 

480  *  [1171 

490  1  Addition  der  Quadrate  [1519] 

500  *  — -  [1174] 

510  FOR  yd  TO  anz  [1305] 

520  FOR  xd  TO  anz  [1064] 

530  quäl (y ,x) =gua1 (y ,x)+qua2 (y,x)  [2113] 

540  NEXT  x,y  [548] 

550  '  [117] 

560  *  Ausdruck  des  magischen  Quadrat1 s  [934] 

570  ‘  -  [1570] 

580  PRINT: PRINT"Magisches  Quadrat"  [2787] 

590  FOR  yd  TO  anz  [1305] 

600  FOR  xd  TO  anz  [1064] 

610  PRINT  USING  "Mit"  jqual  (y  ,x) ;  [1397] 

620  NEXT  x  [3561 

630  PRINT:NEXT  y  [1044] 

640  LOCATE  50 , 25 : PRINT"noch  ein  Quadrat? [Y  [3937] 

/NI" 

650  e$=INKEY$:IF  e$="y"  OR  e$="Y"  THEN  RUN  [1301] 
660  IF  e$="n"  OR  e$*"N"  THEN  END  ELSE  GOTO  [1698] 
650 


Listing  2 


80  1  Werte  des  bekannten  mag. Quadrats  [3036] 

90  DATA  15,2,1,12,4,9,10,7,8,5,6,11,3,14,1  [1860] 
3,0 

100  1  Dimension,  der  4  Hilfsquadrate  [2977] 

110  DIM  a$(4,4),b$(4,4),c$(4,4),d$(4,4)  [1731] 

120  DEFINT  a-z  [553] 

130  '  Zuweisung  der  DATAs  [1765] 

140  FOR  yd  TO  4  [1202] 

150  FOR  xd  TO  4  [710] 

160  READ  q  ( y ,  x )  [653] 

170  NEXT  x  [356] 

180  NEXT  y  [359] 

190  ’  Zuweisung  der  Dualzahlen  an  die  Hilf  [2382] 
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len  und  vertikalen  Reihen  erhält  man 
durch  Addition  der  Zahlen  1  -  n  und 
der  Vielfachen  von  n.  In  unserem  Bei¬ 
spiel  also  1+2+3+4+5+0+5+10+ 
15+20=65. 

Interessant  ist  noch  die  Tatsache,  daß 
Quadrate  entstehen  können,  in  de¬ 
nen  die  sogenannten  gebrochenen 
Diagonalen  auch  die  konstante 
Summe  bilden.  In  unserem  Beispiel 
also  die  Zahlen  1,  22,  18,  14  und  10 
sowie  8, 4, 25, 16  und  12.  Auf  20-fache 
Weise  läßt  sich  dann  die  konstante 
Summe  bilden.  Solche  Quadrate 
nennt  man  auch  panmagische  Qua¬ 
drate. 

Nach  dem  Start  durch  RUN  wird  nach 
der  Größe  des  zu  bildenden  Quadrats 
gefragt.  Hier  ist  eine  ungerade  Zahl 
einzugeben,  welche  die  Anzahl  der 
Felder  einer  Reihe  festlegt. 
Anschließend  erfolgt  die  Darstellung 
der  beiden  Hilfsquadrate  und  des 
endgültigen  magischen  Quadrats. 
Aber  ACHTUNG,  eine  komplette 
Darstellung  ist  nur  bis  zu  einem 
11*1  l-feldrigem  Quadrat  möglich! 
Natürlich  können  auch  größere 
Quadrate  gebildet  werden,  dann  al¬ 


lerdings  müssen  die  entsprechenden 
Befehle  zur  Darstellung  des  Quadrats 
auf  dem  Bildschirm  geändert  werden. 
Dem  interessierten  Leser  ist  es  freige¬ 
stellt,  auch  andere  Zyklenordnungen 
auszuprobieren. 


Bildung  magischer  Quadrate 
mit  Hilfe  des  Dualsystems 

Eine  weitere  interessante  Methode 
zum  Bilden  von  magischen  Quadra¬ 
ten  läßt  sich  mit  Hilfe  des  Dualsy¬ 
stems  realisieren.  Hier  wird  vom  be¬ 
kannten  duerischen  Quadrat  ausge¬ 
gangen,  das  um  1  reduziert  wurde.  Für 
den  Liebhaber  solcher  mathemati¬ 
scher  Spielereien  sicherlich  eine  inte¬ 
ressante  Aufgabe. 

Die  Zahlen  0-15  des  Ausgangs¬ 
quadrats  werden  in  vierstellige  Dual¬ 
zahlen  umgewandelt.  Jede  der  vier 
Stellen  repräsentiert  ein  Hilfsqua¬ 
drat.  In  diese  vier  Hilfsquadrate  (a  -  d) 
werden  nun  die  Zeichen  1  oder  0  aus 
den  Dualzahlen  des  Ausgangsqua¬ 
drats  geschrieben.  Die  Zeichen  der 
8-er  Potenz  in  a,  der  4-er  Potenz  in  b, 
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der  2-er  Potenz  in  c  und  der  1-er  Potenz 
in  d.  Interessant  ist  jetzt,  daß  die  Dual¬ 
zahlen  des  Ausgangsquadrats  und 
der  Hilfsquadrate  für  sich  schon  ma¬ 
gische  Quadrate  mit  der  Konstanten  8 
bzw.  2  bilden.  Durch  andere  Reihen¬ 
folgen  der  Hilfsquadrate  (z.B.  a,  b,  d, 
c)  und  anschließendes  Zusamramen- 
fassen  zu  neuen  vierstelligen  Dual¬ 
zahlen  und  Umwandeln  in  Dezimal¬ 
zahlen  erhält  man  neue  magische 
Quadrate. 

Selbst  das  Vertauschen  der  Zeichen  1 
gegen  0  und  umgekehrt,  und  an¬ 
schließendem  Umwandeln  führt  zu 
neuen  magischen  Quadraten  (z.B.  a 
in  A  und  dann  b,  c,  A,  d).  Mit  dieser 
Methode  läßt  sich  eine  Vielzahl  von 
magischen  Quadraten  bilden. 

In  dem  Programm  (Listing  2)  werden 
nur  die  einfachen  Vertauschungen 
vorgestellt  Wer  sich  jedoch  dafür 
interessiert,  kann  auch  die  anderen 
Varianten  programmieren. 

Das  Programm  wird  mit  RUN  gestar¬ 
tet  und  zeigt  kurz  darauf  die  Aus¬ 
gangsquadrate,  die  Hilfsquadrate 
und  einige  neu  entstandene,  magi¬ 
sche  Quadrate.  (R.  Nielsen/SR) 


squadrate 

200  FOR  y=1  TO  4  [1202] 

210  FOR  X»1  TO  4  [7101 

220  a$(y,x)=MID$(BIN$(q(y,x),4),1  ,1 )  [1096] 

230  b$ (y ,x) =MID$ ( BIN$ (q(y ,x ) , 4 ) , 2 , 1 )  [1797] 

240  c$ (y rx ) =MID$ { BIN$ (qty ,x ) ,  4  ) ,  3 , 1 )  [957  ] 

250  d$ (y ,x ) =MID$ { BIN$ (qty, x), 4), 4,1 )  [1755] 

260  NEXT  x  [356] 

270  NEXT  y  [3591 


280  '  Anzeige  des  Ausgangsquad. (dezimal  un  [4045] 
d  dual)  und  der  4  Hilfsquad. 

290  MODE  2 : LOCATE  8 , 1 : PRINT"Ausgangsquadra  [6091] 
te";: LOCATE  48,1 :PRlNT"Hilf squadrate" 

300  PRINT"  -dezimal-  -dual--  [58431 

-8er-  -4er-  -2er-  -1er" 

310  FOR  y=1  TO  4  [1202] 

320  FOR  x=1  TO  4  [710] 

330  LOCATE  x+z ,y+2:PRINT  USING  "##";q(y,x)  [1104] 

340  LOCATE  x+z2  +  1  4 , y+2: PRINT  BIN$ (q(y ,X ) , 4  [2273] 
) ; "  " ; 

350  LOCATE  x+zl +35, y+2: PRINT  a$(y,x);  [2027] 

360  LOCATE  x+zl  +45 ,y+2 : PRINT  b$(y,x);  [2331  ] 

370  LOCATE  x+zl +55 , y+2 : PRINT  c$(y,x);  (29281 

380  LOCATE  x+zl +65 , y+2 : PRINT  d$(y,x);  [1764] 


390  z=z+2:z1 =z1 +1 :z2=z2+4  [1675] 

400  NEXT  x  [356] 

410  PRINT: z=0:z1=*0:z2«=0  [14111 

420  NEXT  y  [359] 

430  *  Bildung  neuer  mag.  Quad.  durch  versc  [4443] 
hiedene  Kombinationen  der  Hilfsquad. 

440  FOR  y=1  TO  4  [1202] 

450  FOR  x=1  TO  4  [7101 


460  a(y,x)=VAL(STR$(VAL(,,&x,,+a$(y,x)+b$(y,  [3327] 
x)+d$(y,x)+c$(y,x) ) ) ) 

470  b(y,x)=VAL(STR$(VAL( "&x"+a$(y,x)+c$ (y,  (35671 
x)+b$ (y ,x)+d$(y,x) ) ) ) 

480  c(y,x)=>VAL(STR$(VAL("&x"+a$(y,x)+c$(y,  [3551  1 
x)+d$(y,x)+b$ (y,x) } ) } 

490  d(y,x)=VAL(STR$(VAL("&x"+a$(y,x)+d$(y,  [4372] 
x)+b$(y,x)+c$ (y,x) ) ) ) 

500  e(y ,x) =VAL(STR$< VAL( "ixM+a$(y,x)+d$(y ,  [2556] 
x ) +c$ ( y , x ) +b$ ( y , x ) ) ) ) 

510  f (y,x)=VAL(STR$(VAL("&x"+b${y,x)+a${y,  [4106] 
x)+c$(y,x)+d$ (y,x) ) ) ) 

520  g(y,x)=VAL(STR$(VAL( "&x"+b$(y,x)+a$(y,  (46441 
x)+d$(y,x)+c$(y,x) ) ) ) 

530  h(y,x)=VAL(STR$(VAL("&x"+b$(y,x)+c$(y,  [3439] 


x)+a$(y,x)+d$(y,x) ) ) ) 

540  i (y ,x) =VAL ( STR$ ( VAL( "&x"+b$ (y ,x)+c$ (y ,  [3719] 
x)+d$(y,x)+a${y,x) ) ) ) 

550  j (y ,x ) =VAL ( STR$ ( VAL ( "&x"+b$ (y ,x ) +d$ (y ,  (24931 
x)+a${y,x)+c$ (y,x) } ) ) 

560  k(y,x) =VAL(STR$( VAL{ "&x"+b$(y,x)+d$(y,  [40411 
x)+c$ (y ,x)+a$ (y ,x) ) ) ) 


570  NEXT  x  (3561 

580  NEXT  y  (3591 

590  '  Anzeige  der  neu  entstandenen  Quadrat  [2674] 
e 

600  LOCATE  10,8: PRINT"Neue  magische  Quadra  [2114] 
te" 

610  i«1sj.10  (7261 

620  FOR  y=1  TO  4  11202] 

630  FOR  x=1  TO  4  [7101 

640  LOCATE  i , j : PRINT  USING"## " ;a (y ,x ) ;  [2498] 

650  LOCATE  i+1 4 , j : PRINT  USING"##";b(y ,x) ;  [1270] 

660  LOCATE  i +28, j: PRINT  USING"##" ; c (y ,x ) ;  [1983] 

670  LOCATE  i+42,j:PRINT  USING"##";d(y ,x) ;  123251 

680  LOCATE  i+56,j:PRINT  USING"##”;e(y,x) ;  [2692] 

690  i»i+3  (4501 

700  NEXT  x  (356) 

710  PRINT :i»1 : j  =*j  +1  (942) 

720  NEXT  y  (3591 

730  i»1 : j  »15  (7371 

740  FOR  y=1  TO  4  [1202] 

750  FOR  x=1  TO  4  [710] 

760  LOCATE  i, j : PRINT  USING"##";f <y ,x) ;  [2622] 

770  LOCATE  i+14,j:PRINT  USING"##" ; g(y,x ) ;  [12653 
780  LOCATE  i+28,j:PRINT  USING"##";h(y ,x) ;  117491 

790  LOCATE  i+42,j:PRINT  USING"##" ; i <y,x ) ;  [2436] 

800  LOCATE  i+56 ,j : PRINT  USING"##" ;j (y,x) ;  (2481) 

810  i=i+3  (4501 

820  NEXT  x  [3561 

830  PRINT:i=1 : j=j+1  [9421 

840  NEXT  y  [359] 

850  i=1 : j  =21  (7351 

860  FOR  ya.1  TO  4  [1202] 

870  FOR  X=1  TO  4  [710] 

880  LOCATE  i , j : PRINT  USING"##";k(y ,x) ;  [2369] 

890  l=i+3  (4501 

900  NEXT  x  (3561 

910  PRINT:i=1 : j  =j  +1  [9421 

920  NEXT  y  13591 

930  LOCATE  20 ,25 : PRINT"Programmende  eine  T  (4612] 
aste  drueckenl" 

940  e$*INKEY$ :IF  e$=""  THEN  940  ELSE  END  [15381 
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BASIC-Schachprogramm 

_  st  schreiben 
mit 

—  I  Schneider 

j_n  V  foeurscH f n  BertMaswinif-vefiLAü  g *bh  ( 


Hamann/Eden: 
Basic-Schachprogramme 
schreiben  mit  Schneider 
Deutscher  Betriebswirte 
Verlag  1986, 

166  Seiten 

ISBN  3-88640-035-2 
Preis:  DM  29,80 

Das  Spiel  der  Könige  selbst 
programmiert  -  ein  Wunsch¬ 
traum  vieler  begeisterter  Com- 
puterschachspieler. 

Die  Autoren  von  Schach¬ 
programmen  gelten  in  der 
Regel  als  Genies  -  jetzt 
können  Sie  sich  selbst  ver¬ 
suchen.  Das  hier  beschrie¬ 
bene  Buch  vermittelt  die 
notwendigen  Kenntnisse,  um 
ein  Schachprogramm  in 
Basic  auf  den  Schneider 
CPC’s  zu  erstellen.  Dazu  ge¬ 
ben  die  Autoren  reichlich 
Hintergrundinformationen 
und  Bemerkungen  zu  den 
jeweiligen  Programmab¬ 
schnitten.  Mit  jedem  Kapi¬ 
tel  wächst  das  Wissen  um 
das  Geheimnis  der  Schach¬ 
programmierung. 

So  entsteht  ein  Basic-Schach- 
programm  der  einfachen 
Art,  das  aber  die  Grund¬ 
züge  der  Schach  Program¬ 
mierung  sehr  eindrucksvoll 
wiedergibt  und  zu  stetigen 
Verbesserungen  und  Ergän¬ 
zungen  anregt.  Da  hier  aus¬ 
schließlich  in  Basic  pro¬ 
grammiertwird,  besteht  ein 
zusätzlicher  Reiz  im  Umset¬ 
zen  einzelner,  zeitkritischer 
Routinen  in  Maschinenspra¬ 
che  o.ä.,  im  Einbinden  wei¬ 
terer  Eröffnungsvarianten 
und  vielem  mehr. 

Ein  für  Schachbegeisterte 
und  die,  die  es  werden  wol¬ 
len,  wirklich  interessantes 
Buch  mit  vielen  Perspekti¬ 
ven. 


Schneider 

Das  Schneider  CPC 
Grafikbuch 
Sybex  Verlag  1986 
327  Seiten 
ISBN  3-88745-611-4 
Preis:  DM  48,- 

Die  grafischen  Eigenschaf¬ 
ten  der  Schneider  Computer 
bieten  interessante  und  viel¬ 
fältige  Anwendungsmög- 
lichkeiten.  Das  komplexe 
Thema  Grafik  wird  hier 
sehr  ausführlich  behan¬ 
delt;  fast  jede  erdenkliche 
Art  von  Grafik  findet  man 
in  Form  von  Beispielen  wie¬ 
der. 

Dieser  Bereich  zieht  sich  von 
der  einfachen  Grafik  (z.B. 
Kreise  zeichnen)  bis  hin  zur 
kompletten  Geschäftsgrafik 
in  Form  von  3D-Balken- 
bzw.  Tortendiagrammen. 
Programmiert  wird  sowohl 
in  Basic  als  auch  in  Maschi¬ 
nensprache,  so  daß  Anfän¬ 
ger  wie  auch  Fortgeschrit¬ 
tene  gleichermaßen  bedient 
werden.  Mit  gutem  didakti¬ 
schen  Aufbau  erhält  man 
sogar  einige  Befehlserweite¬ 
rungen,  u.a.  sogar  eine  kom¬ 
plette  Sprite-Routine  für  den 
CPC  464.  Ansonsten  sind 
alle  behandelten  Program¬ 
me  und  Themen  auf  die  drei 
CPC-Systeme  gleicherma¬ 
ßen  anzuwenden;  man  er¬ 
hält  eine  umfassende  Dar¬ 
stellung  aller  Aspekte  der 
Computergrafik. 


^5*3  Das  0* 

Schneider  CPC 

Grafikbuch 


Man*  Lorenz  Schneider 


Zahlreiche  Beispielaufgaben 
und  Abbildungen  verdeut¬ 
lichen  die  Thematik  und  er¬ 
möglichen  zudem  das  Er¬ 
weitern  der  Programme  durch 
eigene  Kreativität. 


. . . 

□IMIN  RETZUFF  SCHNEIDER 
STRASSENBURG 


CPC 

TIPS  STRICKS 


Dullin/Retzlaff/ 
Schneider/Strassenburg 
CPC  Tips  &  Tricks, 

Band  2 

Data  Becker  1985 
250  Seiten 
ISBN  3-89011-131-9 
Preis:  DM  39,- 

Das  Tips  &  Tricks-Buch 
liegt  bereits  im  zweiten  Band 
vor,  und  beschäftigt  sich  mit 
allen  drei  CPC-Rechnern. 
Die  grobe  Gliederung  kann 
in  drei  Kapitel  vorgenom¬ 
men  werden  -  Basic,  Befehls- 
erweiterungen  sowie  Ma¬ 
schinensprache.  Für  Einstei¬ 
ger  dürfte  dieses  Buch  be¬ 
sonders  interessant  sein,  da 
die  Grundlagen  anschaulich 
erläutert  werden.  Dies  gilt 
besonders  für  den  Maschi¬ 
nensprache-Teil,  der  einige 
wertvolle  Hintergrundinfor¬ 
mationen  beinhaltet.  Da¬ 
her  sollte  man  dieses  Werk 
auch  nicht  als  Sammlung 
von  Tips  ansehen,  sondern 
eher  als  Arbeitshilfe  in  Au¬ 
genschein  nehmen. 

Einige  Beispiele  aus  dem 
Inhalt  (z.B.  Hardcopy.  Va- 
riablendump,  3D-Grafik) 
zeigen,  daß  die  Routinen  aus 
den  unterschiedlichsten  Be¬ 
reichen  stammen  und  dem¬ 
entsprechend  breite  Ver¬ 
wendung  finden.  Alles  in 
allem  ein  Buch,  das  viele 
nützliche  Hinweise  und 
Hilfsroutinen  zum  effekti¬ 
veren  Arbeiten  mit  den 
CPC's  beinhaltet. 

Fischer 

Comal  in  Beispielen 
Teubner  Verlag  1986 
208  Seiten 
ISBN  3-519-02538-8 
Preis:  DM  24,80 


Eine  Errungenschaft  der 
heutigen  Computerzeit  ist 
die  Programmiersprache 
Comal,  die  bereits  in  vielen 
Einrichtungen  gelehrt  wird 
bzw.  zum  Einsatz  kommt. 
Anwender  dieser  noch  jun¬ 
gen  Sprache  erhalten  hier 
eine  Literatur,  die  ein  praxis¬ 
gerechtes  Arbeiten  in  Co¬ 
mal  erlaubt.  Der  Autor 
zeigt  anhand  vieler  Bei¬ 
spiele  die  Grundelemente 
und  Anwendung  von  Co¬ 
mal  auf  und  gibt  wichtige 
Hinweise  zu  möglichen  Pro¬ 
blemstellungen.  Die  zahl¬ 
reichen  Beispiele  und  Grund¬ 
lagenartikel  ermöglichen 
auch  dem  lediglich  Comal- 
Interessierten  einen  Ein¬ 
blick  in  die  Programmier- 
techniken  und  Eigenhei- 


COMAL 

in  Beispielen 


tcn.  Daß  dabei  bei  weitem 
nicht  alle  Aspekte  berück¬ 
sichtigt  werden,  muß  er¬ 
wähnt  werden,  da  die  ge¬ 
zeigten  Beispiele  haupt¬ 
sächlich  aus  dem  Schulbe¬ 
reich  stammen.  Für  Comal- 
Anwender  scheint  dies  je¬ 
denfalls  die  zur  Zeit  ein¬ 
zige  Literatur  zu  sein!? 

Miller 

Programmieren  mit  CP/M 
Sybex  Verlag  1985 
2.  Auflage 
418  Seiten 
ISBN  3-88745-077-9 
Preis:  DM  52,- 

CP/M  ist  nach  wie  vor  eines 
(wenn  nicht  DAS!)  der  weit¬ 
verbreitetsten  Betriebssyste¬ 
me  für  Microcompuler. 

Ein  bisher  undurchsichtiges 
Kapitel  war  allerdings  die 
Programmierung  mit  CP/M, 
hier  scheiterten  sehr  viele 
Programmierer  bereits  in 
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Programmieren  mit 

CP/M 


den  Anfängen.  Wer  ein 
CP/'M-System  besitzt  und 
auf  Systemebene  program¬ 
mieren  möchte,  ist  mit  dem 
Buch  von  Alan  Miller  gut 
bedient. 

Kenntnisse  in  Z-80-  bzw. 
8080-Assembler  werden  al¬ 
lerdings  v  orausgesetzt.  kein 
Anfängerbuch  also! 

Schon  beim  Durchblättern 
fällt  auf.  daß  hier  wesent¬ 
liche  Informationen  zur  Sy¬ 
stemebene  vorhanden  sind, 
die  ihresgleichen  suchen. 
Die  Programmierung  von 
BIOS.  BDOS  und  CCP  wird 
ausführlich  und  anhand 
zahlreicher  Beispiele  erläu¬ 
tert.  eine  wahre  Fundgrube 
für  CP/M-Programmierer 
des  fortgeschrittenen  Sta¬ 
diums.  Gut  gelungen  ist  eben¬ 
falls  die  reichhaltige  Makro- 
Bibliothek,  die  beim  Pro¬ 
grammieren  große  Dienste 
leisten  kann  und  viele  nütz¬ 
liche  Routinen  und  Pro¬ 
gramme  zur  Verfügung 
stellt. 

Ein  empfehlenswertes  Buch, 
das  Fortgeschrittene  und 
System  Programmierer  zu 
schätzen  wissen. 

Digital  Research 
Das  Handbuch  des 
CP/M  2.2  Betriebs¬ 
systems 

Markt  &  Technik  1986 
404  Seiten 
ISBN  3-89090-369-x 
Preis:  DM  38,- 

Wer  schon  einmal  ver¬ 
sucht  hat,  bei  dem  "Erfin¬ 
der"  von  CP/M.  Digital  Re¬ 
search,  Unterlagen  über  das 
Betriebssystem  zu  erhalten, 
der  wurde  bisher  enttäuscht. 
Markt  &  Technik  hat  nun 


die  Originalhandbücher  von 
Digital  nachgedruckt  und 
bringt  diese  in  engli¬ 
scher  Sprache  auf  den 
Markt.  Damit  erhält  man 
Informationen  zu  dem  ver¬ 
breiteten  Betriebssystem  aus 
erster  Hand  und  zu  einem 
akzeptablen  Preis. 

Der  englischen  Sprache 
sollte  man  allerdings  mäch¬ 
tig  sein,  da  die  Programm¬ 
beispiele  allein  ihre  Wir¬ 
kung  verfehlen  würden. 
Dieses  Handbuch  gibt  In¬ 
formationen  über  alle  Be¬ 
fehle,  Systemaufrufe  und  in¬ 
terne  Strukturen  von  CP/M 
und  ist  fürCP/M-Anwender 
ein  sehr  empfehlenswertes 
Nachschlagewerk. 

Görgens 

Textverarbeitung  mit  Home- 
und  Personalcomputern 
Falken  Verlag  1986 
128  Seiten 

ISBN  3-8068-4316-3 
Preis:  DM  29,80 


Eines  der  interessantesten 
und  häufigsten  Einsatzge¬ 
biete  von  Computern  ist,  ne¬ 
ben  dem  Spiel,  die  Möglich¬ 
keit  der  Textverarbeitung. 
Dieses  Buch  beschäftigt  sich, 
wie  schon  der  Titel  verrät, 
ausschließlich  mit  dem  The¬ 
ma  Textverarbeitung. 

Die  einzelnen  Kapitel  be¬ 
inhalten  neben  allgemeinen 
Erläuterungen  zu  Textsy¬ 
stemen  bzw.  -Programmen, 
vor  allem  das  Zusammen¬ 
spiel  der  einzelnen  Kom¬ 
ponenten  eines  Computers 
(Bildschirm,  Tastatur  etc). 
Des  weiteren  wird  versucht, 
dem  Interessierten  die  Ent¬ 
scheidung  für  oder  wider  ein 
Textverarbeitungssystem 


auf  Computerbasis  zu  er¬ 
leichtern.  Dazu  sind  zahl¬ 
reiche  Computersysteme 
(u.a.  auch  Schneider  CPC 
464/664)  sowie  einige  weni¬ 
ge  Musterprogramme,  wrie 
z.B.  Wordstar,  aufgeführt. 

Hier  präsentiert  sich  aber 
auch  gleich  ein  Schwach¬ 
punkt.  denn  die  Auswahl  der 
Beispielprogramme  scheint 
doch  sehr  willkürlich  vor¬ 
genommen  und  erhebt  kei¬ 
nerlei  Anspruch  auf  Voll¬ 
ständigkeit.  Auch  die  aufge¬ 
führten  Computer  hätten 
sorgfältiger  ausgewählt  wer¬ 
den  sollen;  einige  Systeme 
sind  bereits  veraltet  und  be¬ 
dürfen  daher  auch  keiner 
Erläuterung. 

Steinbuch 

So  werde  ich  EDV-Profi 
IWT- Verlag  1986 
168  Seiten 

ISBN  3-88322-161-9 
Preis:  48,-  DM 

Immer  mehr  junge  Leute 
interessieren  sich  ganz  ge¬ 
zielt  für  Berufe  der  EDV. 
Der  Autor  gibt  mit  diesem 
Buch  zahlreiche  Hinweise, 
wie  man  diesen  Weg  ein- 
schlagen  kann.  Angefan¬ 
gen  bei  den  Voraussetzun¬ 
gen  für  einen  EDV-Beruf 
bis  hin  zur  Vorstellung  der 
einzelnen  Ausbildungsrich¬ 
tungen  mit  genauer  Anschrift 
wird  der  Leser  mit  den  Grund- 
lagen  dieses  Berufszweiges 
vertraut  gemacht. 

Darüber  hinaus  werden  ein¬ 
zelne  EDV-Berufe  vorge¬ 
stellt,  die  Eigenheiten.  Vor¬ 
aussetzungen  und  Aufstiegs¬ 
möglich  keilen  angespro¬ 
chen.  Zusätzlich  bekommt 


Prof.  Pi  Her  A  Steinbuch 

So  werde  ich 
EDV-Profi 

Leitfaden  für  Einsteiger  Umsteiger 
und  Aufsteiger  zur  Ausbildung 
und  zum 
Studium 


der  Leser  noch  Werkzeuge 
in  Form  von  Checklisten 
bzw.  Bewerbungsschreiben 
oder  Lebenslauf  in  die 
Hand,  so  daß  man  zusam¬ 
menfassend  sagen  kann: 

Das  vorliegende  Buch  ent¬ 
hält  alle  notwendigen  Infor¬ 
mationen,  die  für  eine  Be- 
rufsentscheidungderFach- 
richtung  EDV  relevant  sind, 
ohne  natürlich  die  Gewähr 
des  Erfolges  geben  zu  kön¬ 
nen. 

Praktische  Einführung 
in  die  künstliche 
Intelligenz 
IWT-Verlag  1986 
296  Seiten 
ISBN  3-88322-151-1 


Praktische 
Einführung  in 
die  Künstliche 
Intelligenz 


Programm 
Beispielen  r. . 
in  LOGO  .y* 
und  fi?W.  _ 
LISP  ^ 


ABundy 


Utimwiirt 

BtiltaHW» 

oniUHoufw 


Zum  Thema  künstliche  In¬ 
telligenz  sind  bereits  mehrere 
Bücher  erschienen.  Dieses 
schier  unerschöpfliche  The¬ 
ma  macht  es  dennoch  im¬ 
mer  wieder  notwendig,  die 
umfassende  Problematik  aus 
verschiedenen  Perspektiven 
zu  beleuchten.  Der  Autor 
legt  mit  dem  hier  vorliegen¬ 
den  Werk  großen  Werl  auf 
eine  allgemeinverständliche 
Einführung  für  einen  mög¬ 
lichst  großen  Leserkreis. 

Sehr  gut  gelungen  ist  die 
Verknüpfung  von  Theorie 
und  Praxis;  das  Erarbeitete 
wird  sogleich  in  ein  lauf¬ 
fähiges  Programm  umgesetzt. 

Die  aufgeführten  Programm¬ 
beispiele  sind  in  den  Pro¬ 
grammiersprachen  LOGO 
und  LISP  gehalten  -  sind 
also  mit  kleinen  Einschrän¬ 
kungen  direkt  auf  die  Schnei¬ 
der  Computer  anwendbar. 
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HIN . . . . 


Backnang 


Computer-Fans  finden  bei  uns  alles  von: 


Bad  Beichenhall 


Ihr  Spezialist  für  DFU  (RS  232) 

Peter  Kohl 

Waaggasse  4,  8230  Bad  Reichenhall 
Tel  :  08651/66773 


Berlin 


Ihr  starker 
Schneider-Partner 


MfflMHHfmOkia 

DATEN  -  TECHNIK 


Schöneberger  Straße  5  •  1000  Berlin  42  •  Tbl  030-7S2  91  SO/ 60 


r  //Trvrx 


f\yj 


Ö, 


CPCi 


& 


-9° 


A+C  Vertrieb,  1  Berlin  44,  Emser  Str.  18 


.  _  Hardware  /«irl  Marx-Str.  243  "v 

QohnniHor  Kl  s#l,",re  1000  Berlin  44  i 
ö  Beratung  \Am  U  BW.  Neuköln/ 
V  .  ’  M  LH*"*“'  \  030/6841098 


Elektr. + elektronische  Geräte, 
Bauelemente + Werkzeuge 

ELECTRONIC  VON  A-Z 

Stresemannstr.  95  ■  Berlin  61 
Telefon  (030)2611164 


Bonn 


RADIO- 
HIFI- VID 


dEeRoNSEH%2^ 


'  Sht  W 

COMPUTEPEI  y 


JERVICF  SFRVICE  SFRVICF  SC  RVK 


Pliltersdorfer  Straße  206  Telefon  36  40  29 


Castrop-flauxel 


E»C  GUTE  IDEE  NACH  OER  AhCEREN  ElEK’POaiSC-t 

Schuster  Electronic 


BAUElEMEN’i 


CQMPUfcNt  IN  SACHEN  COMPUlt»1  * 


Vertraashandler 
"s  Commodore 

*  Vertragswerkstatt 


Obere  Munslerstr  33  4620  Castrop- Rauxel  (02305)37701 


Düsseldorf 


...alles  für  die  Schneider-Computer! 

rinmni  itßr  Tprminai 


Scnneider 

COFiPuTER  DIVISJQf 


FUNKHA^ 


Freiburg 


Südbadens 

kompetenter 

Computer-Partner. 


Kaiser- Joseph-Str.  232 
^7800  Freiborg,  Tel.:  0761/2180225 


Hamburg 


Löhne/Ostwestfalen 


Ai).  Schneider  Vertragshandler  &  Servicecenter 
;  Hard-  &  Sottware  von  A-Z  für  Ostwestlaien 

"‘5-°  FRITZ  OBERMEIER 

A  •ComputefHiFi’Video'TV- 

4ä  alles  für  Schneider  vom  464  -  Joyce 

ae  Mi«atbi>a>«l  •  BinbrSU.  20*4872  UMa  1  *  Tal.  BB7M/324» 


Nürnberg 


j.  Julius  Stumpf  r+e+g  GmbH 

8531  Markt  Erlbach  T  09846/815 
85  Nbg.  Otmarstr.  9  T  618080 

alphatext-apricot-Schneider 


C-iCompulerslore  _ 


Hochstraße  n 
850C  Nürnberg  80 
Tel  09U/28  90  26 


^Schneider 

tconpuTERomion 


Wn  führen  zu  Den  original  SCHNEIDER-ProduMen  Software  Büche;  unfl 
ZüOelu;  »eischiedene;  -amen  Wie  DATA  BECKER,  VORTEX.  CtJMANA 
iSS,  RUSHWAHE  MARKT  S  TECHNIK,  SVBEX.  VOGEl-Vffl.ac  usw‘ 


Spesenroth 


F 


BERATUNG 

SOFTWARE 

DATA  BECKER  BÜCHER 
HARDWAREER¬ 
WEITERUNGEN 


MICRO-COMPUTER 

SYSTEME 

Rhein-Hunsrück 
5448  Spesenrath 
06762/8400-01 


Würzburg 


HAUER  GmbH.  Würzbarg 
dar  Spezialist  für  alle  ScbaelderCempater. 
Hardware  -  Settwara  -  Zabebür  -  Sanrlca 
Büttner  Str.  29  (blatar  Kaafbaua  Hartla) 
Telefon:  0931/16705 
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Schweiz 


Zürich 


JtntiU  .n  SeebKh  Schallhjusw  SW  473.  B052  Zuren 
Telefon:  01-302  26  00 


Österreich 


Traun 


ING.  SmiSfHI 


ELEKTRONIK 


o 


III  Schneider  ATARI  commodore 

W  VOCtex  Ster  EPSON  landen 

A-4050  TRAUN  SIEBE  NBÜRGERSTR  19  07229/40  18 


In  dieses  Händlerverzeichnis 
können  sich  alle 

IComputer-Händlerl 

eintragen  lassen 


Für  telefonische  Anfragen  steht  Ihnen 
Herr  Schnell  gern  zur  Verfügung. 
Tel.:  05651/8702. 


Anzeigenschluß 
für  die  nächste 
Ausgabe  (8/86) 
von 

Schneider  CPC 
International 
ist  der 
02.07.86 

Erscheinungstermin 
ist  der 
30.07.86 


Achtung! 

An  all •  CPC- Usar- Clubs! 
Suchen  Sie  noch  Mitglieds 
oder  wollen  Kontakte  zu  ande¬ 
ren  CRC- Usern  oder  Clubs 
knöpfen? 

Dann  schreiben  Sie  uns  doch 
einfach.  Wir  veröffentlichen 
jede  Anschrift  eines  CPC-User- 
Cubs  gratis I 

Falls  auch  Ihr  User- Club  sich 
einmal  vorstellen  möchte 
(evt.  mit  Foto),  nutzen  Sie 
unsere  Zeitschrift  als  Verbin- 
dungsglied  und  Kontaktadresse I 


Clubgründung  im  Raum 
Bergheim/Erft  angestrebt 

Interessenten  bitte  melden  bei 
Rudolf  Nitsche, 

Telefon;  (0  22  71)  6  55  88, 
täglich  ab  1  6.30  Uhr 


Berliner  Joyce-Benutzer 
ruft  doch  mal  an! 

Richard  Suchenwirth, 
Telefon:  3  91  47  80 


S.C.C.N-H 

Schneider  Computerclub 
Neunkirchen-Herdorf 
Infos  bei; 

Oliver  Thiele, 

Am  Kirchweg  49, 

5908  Neunkirchen  5, 
Telefon:  (0  27  35)  31  66 


Clubgründung  angestrebt 
CPC  464  Raum  Engelskirchen 
Siegfried  Meyer, 
Lindenpfuhlstraße  32, 

5250  Engelskirchen 


Schneider  Computer  Club  Hamburg 
sucht  Mitglieder  in  ganz  Europa. 

Alexander  Scharf, 

Heimfelderstraße  60, 

2100  Hamburg  90, 

Telefon:  (0  40)  7  90  93  53 


CPC-User-Club 
im  Raum  6250  Limburg? 

Wer  Lust  hat,  bitte  melden  bei: 
Telefon:  (0  64  36)  34  85 


Berliner  Schneider  Club 
sucht  Mitglieder,  auch  weibliche, 
jeden  Alters 
Infos  vom: 

Berliner  User  Club 
Wolfgang  Windorpski, 
Grifznerstraße  38, 

1000  Berlin  41, 

Telefon:  (0  30)  8  22  77  50 


Joyce-Userkreis  Köln 
zu  gründen  gesucht 
Bitte  melden  bei: 

Rainer  Webel, 

Delibrücker  Mauspfad  341, 
5000  Köln  80, 

Telefon:  (02  21)  6  80  45  1 1 


Kontakt  zu  CPC  464-Besitzern 

zwecks  Info- Austausch  gesucht. 
Schreibt  an: 

Olaf  Dany, 

Rüsselsheimerweg  28, 

4630  Bochum  7 
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HURGA-Software 

sucht  Clubmitglieder  zwischen  1 0 
und  16  Jahren  für  das  CPC-Gerät 
Infos  on: 

Hurga- Verwaltung, 

Stichwort:  Computer  CPC, 
Krokusweg  24, 

4840  Rheda-WD, 

Telefon:  (0  52  42}  4  26  23 


Amstrad-Schneider-User-Club 
Aachen  A.S.U.C.A. 
überregional, 

nimmt  noch  Mitglieder  auf. 
Clubzeitung  (44  S.)  gegen  2,50  DM 
in  Briefmarken. 

R,  Cloots, 

Zeißstraße  7, 

5132  Üb-Palenberg, 

Telefon:  (0  24  51)  4  66  08 


Schneider  Computer  Club 
Heinsberg/Rheinland 
Helmut  Krings, 
Josef-Gaspers-Straße  25, 
5138  Heinsberg  1, 

Telefon:  (0  24  52)  57  10 


UCC-GREFRATH 

sucht  Kontakt  zu  anderen  Clubs 
Bitte  melden  bei: 

Carsten  Hoener, 

Velourstraße  1 9, 

4155  Grefrath  1 


Berliner  User-Club 
sucht  Mitglieder,  auch  weibliche, 
jeden  Alters 
Infos  vom: 

Berliner  User-Club 
Wolfgang  Windorpski, 

Gritzner  Straße  38, 

1000  Berlin  38, 

Telefon:  (030)  8  22  77  50  p 
(Anrufbeantworter) 


FREAK-SOFT-CLUß 

CPC  464: 

Ralf  Hopperdietzel 
Theodor-Storm-Straße  22 
8670  Hof  (Saale) 

CPC  664,  CPC  6 128: 
Michael  Eckert 
Zobelsreuther  Straße  30 
8670  Hof  (Saale) 


CPC-464-Userclub 
Tübingen/Böblingen 
sucht  noch  interessierte  CPC- User 
Kein  Clubbeitrag! 

Kontakt: 

Andreas  Kopp 
Harbigstraße  79 
7030  Böblingen 
Telefon:  07031/26508 


CPC-Clubgründung  angestrebt 
im  Raum  Erftkreis  (nähe  Bergheim) 
Ab  16  Jahre  aufwärts 
Bitte  melden  bei: 

Rudolf  Nitsche 
Telefon:  (02271)  65588 


Schneider-Computerclub  e.V. 

Abt.  Ostwestfalen/Lippe 

Info:  Computer-Freunde/Löhne  eV. 

Postfach  1101 

Telefon:  05732/3396 

4972  Löhne  1 
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. Anzeigen- Börse 


Suche  Anschluß  an 
Schneider  CPC-Club 
im  Raum  Unna  oder  Kamen 
Friedhelm  Schürmann 
Schäferstraße  21  a 
4708  Kamen 
Telefon:  (02307)  74653 


Schneider  CPC  Club  Bayreuth 
und  Bayreuther  Computerclub 

Wir  suchen  Mitglieder  aus  ganz  Europa 
Bitte  melden  bei: 

Marco  Konrad 
Fontanestraße  4 
8580  Bayreuth 


CPC  Kontakt 

Tausch  von  Originalsoft-  und 
Hardware.  Kein  Beitrag! 
Ralph  Lukas, 

Im  Junkerbruch  3, 

5143  Wassenberg  4, 
Telefon:  (0  24  32)  34  98 


Amstrad- Schneider- Userclub 
Aachen  A.S.U.C.A. 
nimmt  noch  Mitglieder  auf 
Dipl.-Ing.  R.  Cloots 
Zeißstraße  7 
5132  Übach-Palenberg 
Telefon:  (02451)  46608 


Biete  an  Software 


Fighter  Pilot,  Fwtureworld,  Combat  Lynx.  Gül 

V  08841/8237  v.  18-  19  Uhr 


RIESEN- AUSWAHL 

Spiel-  und  Anwendersoftware 
Liste  anfordern.  M.  Potthoff 
4543  Lienen  -  Postfach  1290 


Individ.  CPC-Tabellenprogromme 

★  Spez.  für  die  Sportverwaltung  ★ 
z.B.  Ranglisten,  Tabellen. 

Bernd  Terwerth,  Scharmannstr.  3  a, 
4050  Mönchengladbach  2 


JOYCE  PCW  8256 

FAKTURA-CONTROL,  3"-Disk  89,-  DM 

Fakturieren  mit  Adress- Verw.  und  autom. 
Mahnprogr.,  offene  Posten  je  Kunde. 

FAKIURA-CONTROL  PIUS,  3"-Disk  139,-  DM 

zusätzl.  mit  Artikel-Bestandsdatei, 
Umsatz-  u.  Mindestbestandskontrolle. 
Indiv.  Programme  zum  Festpreis. 
HASHAGEN,  Eckstraße  1 1, 

6113  Babenhausen  3,  T.:  06073/61993 


★  464-User  dann  ABC-Soft  ★ 

★  ABC-Brief  -  Text  -  Puffer  ★ 

★  ABC-Draw  -  Plot  -  Hacopy  ★ 

★  ABC-Kasse  -  Gew.  -  Lager  ★ 

★  2  Prog.  +  Bonbon  DM  46.40  ★ 

★  ABC-Soft  Katalog  anfordern  ★ 

★  Regentenstr.  34,  5000  Köln  80  ★ 

★  P.  Breitschädel,  T.  022 1  /624357  ★ 

★  ff  ★ 


★  ★  ★  ESCHCOMP-SYSTEM  ★  ★  ★ 
EINNAHME/ÜBERSCHUSSRECHNUNG 

Ärzte  -  Masseure  u.  freie  Berufe 
20  Einnahmekonf  1 20  Ausgabekont. 
Ko.  frei  definierbar,  b.  999  Bu/M. 
Kostensteilen-Auswertung  .... 

Umsatzsteuerermittlung . 

Steuersätze  frei  def.  und  und 
einstellbar  1  /  2  Laufwerke  .  .  . 

für  alle  SCHNEIDER  Computer  .  .  .  . 

und  für  VORTEX  IW  5.25" . 

DM  288  -  incl.  MwSt. 

LEHRER  -  SCHULVERWALTUNG  Progr 
für  SCHNEIDER  Computer  mit  Disc.  3" 

Grundsch./Fachschu./Notenverw. 
Zeugn.  drucken  mit  Bemerk,  (Bay) 
Soziogramm,  Quali  und  und  .... 
Paukerpgr.,  Wochenplan,  Mathetr. 

DM  398,-  ind.  MwSt. 

SUPER  IOTT0PR0GRAMM  für 

SCHNEIDER  VORTEX  LW  5.25" 
mit  allen  Schikanen  DM  99,- 

wir  haben  über  150  Programme  für 
SCHNEIDER  Computer-  Liste  anfor¬ 
dern  gegen  Freiumschlag  od.  2,-  DM 
in  Briefmarken  bei 
ESCHCOMP-SYSTEM,  E.  Scheithauer 
8391  Perlesreet /Tel.: 08S5S/1 390  G 


Verkaufe  org.  Hl-Soft  Pascal 

VB  1 60,-,  G.  JanzenJ.  02421/10327 


★  JOYCE-WÖRTERBUCH  ★ 

ideal  für  Vokabeltraining, 
individuell  benutzbar 
Englisch-Deutsch,  auch  für  Schule! 
Diskette  60,—  DM  per  Nachnahme 
Norbert  Schoffa,  Albstr.  49, 

7505  Ettlingen  G 


Verkaufe  EASY  TOPWORD  (Org.) 

DM  50,-  u.  Schneider-Hefte  1  -  5 
Ang.  Tel.  07732/52440 


Super  Grafik  Programm  Gpaint  CPC 

Gpaint  bietet  Linie,  Kreis,  Box,  Lupe, 
Kopy,  super  Füll  Text,  verkl.  vergr. 
drehen,  Ausschnitt,  lad.  HCopy. 
Disc  45,-  V-Scheck  ggf.  a.  eig 
Disc  35,-.  G.  Radestock, 
Lorscherstr.  37,  6700  Luhafen  29 


Elektr.  CAD  m.  Harde,  u.  Anleitung 

Inventuraufnahme/Ausdr.  a.  Inv.- 
Papier  (CPC  464/NLQ  40 1 )  je  Cass. 
40,—  DM  v.  U.  Frenkel,  Mühlenstr.  68, 
4005  Meerbusch-3,  Tel.:  02 1 05/3628 


C-Basic  Compiler  (Dig.  Research) 

incl.  3  org.  Handbücher  NP  200,-  DM 
für  100,-  DM.  Turbo  Pascal  3.0 
NP  225,-  DM  für  1 10,-  DM.  Beides 
neuwertig.  W  07192/5523 


JOYCE-Statlstik 

Ausreißer,  Klassen  mit  Graphik,  nicht¬ 
lineare  Regression  auch  mit  Graphik 
(Hardcopy!),  t-und-t-Test  -  alles  MS 
DM  75,-  per  Verrechnungsscheck. 
Michael  Maßler,  Gneisenaustr.  2, 
5000  Köln  60, 

Tel.:  0221/7604759 


Star-Wriler  (Original)  +  Sich. -Diskette 
+  Datei  Star  (Original)  beste  Kritik 
in  Schneider  International,  wg. 
Systemwechsel  für  DM  1 98,-  DM. 
*  08178/4313 


Star-Writer  +  Dotol-Star 

Beide  neueste  Version!  Zus  1 80,—  DM 
Döring,  W  0531-5928332/512472 


Für  CPCi  464,  664,  6128  +  Drucker 

Spitzen-ETW-Hausverwaltung  mit 
Datei,  Buchf.  Wohngsabr.  J. -Abschi. 
lnfo+  Demokass.  5,— DM.  Prgr.  1 30,—  DM 
Dipl. -Kfm.,  Wohnungswirt 
P.  Hasenclever,  Beisenherzstr.  2, 
4600  Dortmund  13,T.  0231/283547 


Verkaufe  viele  Spielprogrammel 

Preisliste  u.  Beschreibung  gegen 
Marke.  Keine  Raubkopien! 

K.  Ley,  Postf.  2124,  2390  Flensburg 


■  Super  Anwenderprogramme  für 

M  Schule  u.  Hobby.  Ho.  Groß,  Am 

■  Ginsterberg  13, 6630  Saarlouis  4 


Original  Wordstar  auf  3"-Disk 

mit  Handbuch  für  CPC  1 1  0,—  DM 
V  06435/8759 

TEXPACK  120,-  ★  TAIFUN  90,-  * 

Textomat  60,-  ★  Transmat, 

HMS-Plot,  HMS-KFZ,  HMS-Bilanz, 
HMS-Fabs  je  35,-  ★  Büroassistent, 
Multidatei  Rainbow  Arts,  Multidatei 
Data  Media,  Power  Basic  464,  Jump 
Jet,  Super  Pipeline,  Dayley  Thompson's 
Decathlon,  3D  Voice  Chess  je  30,- 

★  Pool-Billard,  Centre  Court, 
Design  Design,  Toolssammlung  je  25,- 

★  Roland  on  the  Ropes,  Alien  break  in, 
Schatz  der  Pharaonen,  Forest  at 

World's  End  je  1 5,- 
Udo  MaassYk'  ★ 

Tel.:  (07083)  8381 
ab  18:00  Uhr,  Bernsteinsfr  23, 
7506  Bad  Herrenalb  3 


D-D>  Disketten- Dienst progromme< 

Files  retten,  User  ändern,  usw. 

SECTOREN  editieren  256-4096  By. 
Kopiert  fast  alle  GEMEINHEITEN 
bis  43  Tracks,  1  —  16  Sec./Track, 
auch  einzeln,  versch.  FORMATE. 

030/7723358+8542422  v.  1 8-20  h 
für  Einsteiger  und  Profis  >  D-D< 


=  =  >  Programmgenerator! 

Erzeugt  dialoggeführt  BASIC- 
Programme  für  Menüs,  Masken,  Ein- 
und  Ausgabe,  Tabellen,  Laden/ 
Speichern,  Drucken,  Dialog,  etc. 
100  %  Maschinencode  ★  89,—  DM 
Dr.  EGE,  Postfach  82, 
A-6961  Wolfurt  G 


DIN-Wärmebed.+K-Zahl=55,  Datamat—  75, 
Thor-Trilog.=75  V  07427/2519 


Viele  preiswerte  Spiele, 

Mathe,  Anwend.  (z.B.  MINIVISlCALC) 
von  2-28  DM!  Katalog  geg.  1 ,-  DM 
von  SCHNEIDERSOFT,  Andreas  Wagner, 
Gartenstr.  4,  8201  Neubeuern 


★  THE  AMSTRAD  CASSETTE-50 

50  fantastic  games 

on  one  great  cass.  35,- 

★  TOURNAMENT  SNOOKER  29,- 

★  TAPESPEED  2  Copy  42,- 

Verrech.- Scheck  od.  NN+VS 

Fa.  Norbert  Muskatewitz, 

Postfach  1114,  5204  Lohmar  1  G 


Verkaufe  dBase  II  (Original)  für  Joyce 
W  021 1/4981696 


CPC  Steuertabellen  1985/86/87/88 

allg./bes.  Jahr- Monat- Woche-Tag- 
LSt.-ab.,  ESt-Grund+Splitt-Tab., 
neueste  Steuergesetze,  'halbe' 
Kinder,  alle  St.- Kl-,  Druck-Ausg. 

70/80  DM  Cass/Disk  (absetzbar!!) 
bar,  Scheck  o.  NN  an  B.  Dietrich, 
Kaupstr.  50,  6100  Darmstadt, 

V  06151/74978,  Info  gg.  RP 


Probleme  mit  Drurker  NLQ  401? 

Benutzung  wird  kinderleicht  mit 
Programmpaket  Printcom. 
Info  gegen  Freiumschlag. 
Conuteg,  Hahnenpfödchen  9, 
4048  Grevenbroich  2 


Graphics  Lightpen  für  CPC  464 

ungebraucht,  Originalverpackung 

DM  65  -  V  0221/432864 


Univ.  Spielplanerst.-/Verwal»g.  f  Presse, 
Verbände,  Staffelltr.  f.  CPC  — 
Ausf.  Beschreibg  g.  Schufzgebühr 
von  DM  2,50. 

R.  Pappert,  Herrn. -Löns-Str  33, 
2121  Reppenstedt,  Tel:  041 31/61 065 


Programmierer  erstellt  Software 

auf  eigenem  Rechner  zu  Festpreis! 
*3*  06851/5727! 


Wegen  Systemwechsel  zu  verkaufen 

Lightpen  +  Software  DM  50,- 
®  06331/76179 


Komplette  Hausverwaltung 

Es  können  1-150  Wohne,  verwaltet 
werden.  Prog.  enth.  auch  komp. 
Heizkostennebena.,Mahn$chr., 
Abbuchung  aller  Konten  mit  Dat. 
und  vieles  mehr.  Info:  K.  Frank, 
Friedhofstr.  26,  7101  Löwenstein 


★  ★  ★  SCHNEIDER  CK  464  *  ★  ★ 

★  Hannover's  ★ 

★  SOFTWARETHEK  Nr.  1  ★ 

★  ★★★★★★★★★★ 

Mastertronic- Games  a.  C  9.90 
Warlord/Centre  Court  a.  C  29, — 
Music  Composer/Death  Pit  a.  C  32, — 
Fighting  Warrior  a.  C  36, — 

Hyper  Sports  C/D  42/54, — 

The  Way  of  the  Tiger  C/D  36/52, — 
Yie  ar  Kung  Fu  D  52, — 

Colossus  4  Chess  D  59, — 

Hi  Rise/The  Devils  Crown  a.  D  52, — 
Textomat  plus  CPC  61 28  D  198, — 
GRAPHICS  Lightpen+ Software  98, — 
sofort  CSJ  NEWS  anfordern 

★  ★  CSJ  COMPUTERSOFT  J0NIGK  ★  ★ 

★  An  der  Tiafanriad«  27,  3000  Hannover  I  ★ 

★  ★  ★  TeL:  0511/886383  ★  ★  ★ 

★  G  * 


128  CPC  7  ’86 


. . hui  iiiiinitiii  lim  ii  iiiiitimini  ihm  iiHHiiiiHiit  Hm« 


■Anzeigen- Börse 


•k,  ANWENDER-SOFTWARE  für  CK  ★ 

Buchhaltung,  Wertpapierverwaltung, 
Budgetprogramm,  Dateiverwaltung, 
Graphik,  Utilities,  Kaufmännisches. 
INFO:  Martin  Wolfrum,  040/5385932 


Für  Schule  und  Lehrerl 

Notenverwaltung:  Berechnung  mit 
Wichtung.  Notenlisten  -  Schnitt  - 
Übersichten  -  Klassenlisten  -  Noten¬ 
spiegel  -  Unk.-Beitr.  65  -  für  Disc.  3". 
Info  Freiumschlag 
Claus  Bernhold,  Rommelstr.  31, 
8783  Hammelburg  2 


12  tolle  Spiele  •  Kass.  a  DM  20-  • 

keine  Raubk  •  H.  Behrendt, 
Neustadt  3,  3550  Marburg  0  Alle  (PC's 


★  CPC  464  Englisch  lernen!!!  ★ 

komfortables  Lernprogramm  auf 
Kass  DM  1 4,-;  Disk.  DM  25,-; T.  Schray, 
Altenbachweg  8/1,-7120  Bietigheim 


Orig.  STAR-WRITER  (Vers.  2.0)+ S- Disk 
140,-,  STATISTIC-STAR  (D)  40,- 
T.  0208/476527  (nachmittags) 


CPC-lnt.  komplett!  16  Hefte  + 
Dalaboxen  High  1/2,  11,4  +  CPC 
Text-Adr(M/T)  150,-T.  0461/59389 


==>  finaezmathematik  <  == 

Für  CPC  664/61 2 8/JOYCE/JOYCE+ 
Zinseszins/Abschreibung/Renten 
Tilgung/Kurs/Rentabilität 
Investitionsrechnung 
Disk/95  DM+ Versand  (Nachnahme) 
Dr  Fiedler,  Am  Tönnessenkreuz  5 
5300  Bonn  1  /  Tel.:  0228/649240 

G 


Software,  Beratung,  Schulung,  bei 

Software  Riotte,  »(06851)  5727 
für  CPC's  und  Joyce!  Festpreis!  G 


WordStor  3.0  CPC  464/664  130,-  DM 

Message  from  Andromeda,  Master 
of  the  Lamps,  Sweevos  World, 
Marsport,  Fufureworld,  Enterprise 
auf  Cassette  zusammen  1  20,—  DM; 
Tel.:  0209/1 30059 


dBase  II,  angepaBt  für  JOYCE,  auf  3"-Disk., 

originalverpackt,  für  DM  1 10,-; 
Tel.:  07346/2237 


Biete  an  Hardware 


CPC  664  (1 28K)  Grün- Monitor,  dBase  Prag, 

Textomat,  Spiele,  Bücher,  Zeitschr., 
Disketten  1 195,— DM;  Vortex- Floppy 
Fl-X  (708K)  650,-  DM;  Drucker 
DMP  2000,  Kabel  640-  DM  —■  kompl. 
2350,-  DM,  Tel.:  02241/334923 


CPC  6128  Grün  +  Drucker  NLQ  401 

+  Kabel  +  Traktor  +  dBase  II  für 
DM  2000,—  zu  verkaufen. 

Tel.:  069/361819  (ab  2.6.86) 


CPC  6128  Color-Mon.  +  lit.  1700,-  DM 

R  laugisch,  6701  Ruppertsberg  G 


Verkaufe  CPC  61 28+Forbmonitor+Drucker 

DMP  2000+dBase  Il+Wordstar+Super 
Games  Il+Joystick+Bücher  für 
2300,-  DM,  Tel.:  08463/1 645 


Österreich: 

Panasonic-Disketten  3" 
für  Schneider  Oes  95- 

Tel.-.  05373/3401  ab  15.30 


Verk.  CPC  464,  grün  +  Lit.  +  Softw.  = 
650,- DM.  K.-E.  Kiel  »  05746/8160 


Verk.  Farbmonitor  CTM  644  ca.  8  Mon.  alt 

Preis  DM  550,-  Tel.-.  0715245894 


CPC  464 -Farbe,  DDI-1,  NLQ  401,  Seikosha- 

GP500CPC,  Schneider-Computertisch, 
über  100  orig.  Programme  u.  viel 
Zubehör,  Bücher  NUR  2222,—  DM! 
Telefon:  069/306918 


464  mit  128K,  Floppy,  CP80,  DFÜ 

»  02204/60324 


Schneider  CPC  464/CPC  664  User! 
Lichtgriffel  mit  Programmen  und  dt. 
Anleitung  nur  DM  49,- 
Versand  gegen  Scheck/Nachnahme 
Info  gratis!  Fa.  SchiBlbauer, 

Postfach  1  1 7 1  S,  8458  Sulzbach, 
Tel.:  09661/6592  bis  21  Uhr  G 


464G  +  Pragr.  +  SP  64  =  590  +  150,-, 

DD1  — 640,  FD1  =440,  NLQ=480 
Tel.  07427/2519 


■  SP  512  KIT 

Aufrüstkit  für  VORTEX  SP  64  auf 
512  KByte  Billig!!  nur  198,-  DM 
Eichbauer,  09135/1252  ab  14  Uhr 

G 


NLQ  401  (Drucker)  +  Traktor  +  Text¬ 
verarbeitung  Textomat  VHB  500,- 
*  055 1  /37 1 594  vor  8.00,  nach  2 1 .00 


CPC  464  mit  Farbmonitor  +  Bücher 

+Programme+Zeits.  T.  0534 1  / 45905 


CPC  464  +  neues  FD1  +  Soft  +  Bücher 

VB  1 350,-+Vortex  RAM-Erw.  SP320 
VB  1 600,-;  Tel.:  0251/21 4566 


CPC  664  Farbe,  neuw.,  Disk.,  Lit.,  Pgme. 
DM1650,-  Tel.:  02254/3089 


HOCHWERTIGE  QUALITÄTSDISKETTEN 

z.B.  10  DS/DD  96  TPI  5,25"  für 
VORTEX,  inkl.  Archivbox,  DM  55,- 
zuzügl.  NN  and.  Typ.  auf  Anfrage. 
Inge  Martinke,  Nideggenerstr.  7, 
5350  Euskirchen  ß  02251/72340 


CPC  464  Calor  mit  viel  Hard-  u.  Software 

DM  1 1 00,-,-  Tel.:  089/4645 1 0 


CPC  664  +  2.  LW  1MB  (CUM ANA)  + 
WORDSTAR  +  RH- DAT  u.a. 

DM  1 1 99-  VB, 

Kiel  0431/61484  abends 


CPC  464  Col.+DDI-l  +NLQ  401  +Joy$t.  + 

reichlich  Software  +  Lit.  DM  1  850,—. 

A.  Barkhoff,  Lilienthalstr.  1 5, 
4650  Gelsenk.  Tel.:  0209/44399 


Verk.  Umrüstsatz  vor.  4512  Prof. 

Preis  300,-  w.  Aufgabe  (NEUW.) 
Tel.:  07022/61634  n.  19.00  Uhr 


Verk.  CPC  664+ DMP  2000+Stur-Wriler 

3  Mon  alt  für  1 300  -  und  NLQ  401 
für  300-  Tel:  04542/3522 


Präsident  Printer  6313 

Centr.-Interf.  ★  Schneider  +  Epson 
NLQ  ★★★  DM  748,-  ★★★  IBM 
K  Geißer  ★  Daten!  Tel.:  09288/7929 

G 


CPC  464  Grün  originalveipackt 

nur  650,—  DM 

Stgf.,  Tel.:  071 1/764331  ab  19  Uhr 


ACHTUNG  SCHNEIDER  464  ACHTUNG 

m.  Grünmonitor,  Software,  Joysticks 
und  Literatur 
für  850,-  zu  verkaufen. 

Tel.-.  040/702  30  98  ab  19.00  Uhr 


Verk.  CPC  6 1 28  +  MP  2  +  RC  =  3  Mon.  ah 

VB  1550,- Tel.:  05805/667 


Vortex 

Diskeftenstation  Fl-X  758,— 

Diskettenstation  Ml-X  758,- 

X-Modul  298,- 

Speicherkarte  64KB  SP-64  275,— 
Erweiterung  64KB  KIT  64  73,- 

Erweiterung  256KB  KIT  256  2 1 3, — 
Erweiterung  512KB  KIT  51 2  314,- 
Computertyp  angeben! 

H.  Kühn,  Schulstr.  7,  3447  Meißner 

G 


CPC  464  (Grün)  mit  VORTEX  51 2K  Speidcer- 
karte:  950,-  DM,  Diskette  DDI-I: 
550  -  DM,  Drucker  NLQ:  500  -  DM. 
SOFTWARE:  ca.  50  Programme  incl. 
CPC  Text  +  WORDSTAR  (origin.): 
200,-  DM  (alles  VB-Preise),  Kubina, 
6000  FRANKFURT:  069/558333 


NLQ  401  +  Traktor  +  Farbbänder 

Komplett  550,-  DM;  T.  089/71 45884 


664  Grün  5  Mon.,  Joyst.,  Softw.  z.B.  Elite 
VB  1300,-,-T.  06021/95828  AB 


CK  664  mit  Faibmoaitor  +  Programme+ 
Zubehör  zusammen  für  1 550,-  DM 
Verhandlung;  Tel.:  07121/17349 


Neue  und  gebrauchte  CPC  Hardware, 

Joyce,  Floppy,  Software,  Finanz-  und 
Hausverwaltungen,  Manfred  Kobusch, 
Bergenkamp  8,  4750  Unna  G 


Cumaaa  3"-Zweitfloppy 

5  Mon.  alt;  300,-,-  T.  0228/348798 


Tlefstpreise  bei  Gobranchtger. 

oder  Miete,  z.B.  DM  1 9,-  für  CPC  464 
mon.  INFO:  Computer- Versand, 
5500  Trier,  Posrf.  2 1 06,  T.  0651/1 6366 

G 


FÜR  KENNER 

Schneider  CPC  464- 512KB 
2  Vortex  Doppellaufwerke 
menueg esteuerte  Programme 
dBase  II  etc.  von  Privat 
»  05424/4164 


Neuw.  CK  61 28  Grün+NLQ  401 +SFT  401 

Schufzhauben  kpl.  1 950,—  DM 

orig.  dBase  li  1 50  -  DM 

orig.  Turbo  Pascal  3.0  Vers.  II 250,—  DM 
orig.  Textomat  1 00,-  DM 

»  02162/6615  nach  1  8  Uhr 


Eprom -  Pr ogram m i e rp latiee  komplett  191,- 

auch  als  Bausatz. 

Anschließbar  an  jeden  Computer, 
geeignet  für  Centronics-Schnittstelle. 
Fa.  Sprengel/Kruschel 
Chamisso  Str.  1 
3000  Hannover 

Telefon:  0511/3505906  G 


NLQ  401  fast  neu,  VB  DM  600,- 

V.  Kindl  er,  Telefon:  0202/722837 


Joyce  8256  m.  RS-232  2  Mn.  alt 

Wordstar,  wg.  Systemwechsel  für  nur 
1550,- DM;  »  04131/128888 


CPC  International  komplett  '85 

zu  verkaufen  T.  057 1/41 524  (nachm.) 


Suche  Software 


Suche  Programm  zur  Stumienplanerstellng 

für  20  Schulklassen  am  CPC  6128. 
E.  Weiskirchner,  Dr.  Premstr.  5 
A-6330  Kufstein 


Suche  Platinenprogramm 

CPC  464  Epson  LX  80 
Becker,  H.-R.,  Müglitzer  Weg  9, 
7320  Göppingen,  Tel.:  071 61/28798 


Suche  dBase  11  für  Joyce.  Evtl.  Tausch 
gegen  Orig.  Star- Mail  +  Datei-Star. 
R.  Homa,  Königsbergerstr.  23, 
6729  JOCKGRIM 


Suche  für  Joyce  PCW  8512 

Terminalprogramm 
Tages- Wochen-Monats-Jahresterm. 
G.  Rockenfeiler,  Haarweg  63, 
5870  Hemer,  Tel.:  02372/1853 


CK  6128  Disc  suche  Energieberatiug 

Modernisierung  von  Heizungsanlagen 

»  040/672271 5 


Suche  geb.  Programme  für  Joyce 

u.a  Finanzbuchhaltung,  Grafik  Schach, 
Rechtschreibung.  P.  Ammon, 
Döblinweg  1  7,  4920  Lemgo, 

Tel.:  05261/10741  o.  12237 


HnusverwaHingspr.  für  JOYCE  gesucht. 

»  05924/417  ab  17.00  Uhr 


Tausche  und  suche  Programme,  S.  Funk, 
Woffendorferstr.  42, 8621  Altenkuns 


7  86  CPC  129 
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Sud»  für  (PC  464  mit  Speichererweiterung 
von  Vortex  512  Datei-Programm, 
leistungsfähig  für  Versicherungen  mit 
deutsch  DIN-Tastatur,  Rundbriefe, 
Adressaufkleber  evtl,  mit  2.  Disketten¬ 
laufwerk  -  Drucker  Syneiec  80  vor¬ 
handen.  Angabe  Adressenzahl 
N.  Mai,  M.-v.-Richthofen-Str.  222, 

1 000  Berlin  42 


War  hilft  «ir?  Druckerinstallation 
WordStar/Joyce  an  Triumph-Adler 
SEI 030,  Hardwareproblem  ist  gelöst. 
Matthias  Woisin,  Gertigstr.  66, 
2000  Hamburg  60 


Suche  Hardware 


Seche  DOI-1,  ff  07363/4246 


UM-SOFT 

Soft-  u.  Hardware  Verm. 

4220  Dinslaken-3 
Tel.:  02 134/96 979  G 


Kontakte 


Suche  Kontakte  zu  Pascal-Anwendern 
oder  Pascal-User-Clubs 

zwecks  Erfahrungsaustausch. 
(Standard,  UCSD,  MT+  und 
Turbo- Pascal),  Chiffre:  300586 


Verschiedenes 


★  ★  gixisamcpc  ★  ★ 

...und  nicht  nur  Girls.  Jedes 
Bild,  jeder  Gegenstand  als  Vorlage 
für  CPC-Monitorbilder. 

Wie  es  Ihnen  gerade  gefällt. 
Wie???  Info  gratis! 
Schreiben  Sie  oder  rufen  Sie  an: 
H.  Büttner  ★  Ringstraße  1 5, 
8641  Teflau  2, 

Tel.:  (09269)  7155  (abends) 


Verkaufe  dlv.  CPC- Hefte 

ff  06132/86584 


BIETE  DM  50,- 

für  Schneider  CPC  International  Hefte 
3,  4,  5,  6,  7  in  gutem  Zustand! 
Hartmut  Müller, 

Albblickstr.  2,  7406  Mösslingen 


Etikette  genau  passend  fir  3"-Diskettea 

Bedruckt  mit  A-  u.  B-Seite. 

20  Stck.  nur  10,—  DM  inkl.  Porto 
Nur  gegen  Vorkasse  Schein/Scheck. 
E-H-E,  Schroerstraße  34, 

390  Gladbeck  G 


Verkaufe  alle  CPC  International 

für  120,- DM.  Tel.:  099 1/3258 7  ★  ★ 


Tausch 


Tausche  Farbmon.  CTM640  gegen  Grünmon. 

+  DM  200,-.  Tel.:  0521/432369 


Das  Ist  Ihre  Chance... 
schon  eine  Kleinanzeige  bringt 
oftmals  großen  Erfolg  und  hilft 
neue  Kontahte  knüpfen. 

Nutzen  Sie  unser  Angebot  und 
profitieren  Sie  von  der  Tatsache, 
daB  unsere  Zeitschrift 
„Schneider  CPC  International" 
Jeden  Monat  von  mehreren  zig¬ 
tausend  Computer-Interessierten 
gelesen  wird. 

Milchten  Sie  etwas  verkaufen, 
tauschen  oder  suchen  Sie  das 
„Tüpfelchen  aut  dem  I"  -  dann 
sollten  Sie  die  eigens  hierfür  be¬ 
stimmte  Bestellkarte  Im  Heft  aus¬ 
füllen  und  an  unseren  Verlag 
absenden. 

Ihre  Annonce  erscheint  dann  In 
der  nächsterreichbaren  Ausgabe. 

Wir  möchten  ausdrücklich  darauf  hinwei- 
sen,  daß  wir  keine  Anzeigen  veröffent¬ 
lichen,  aus  denen  ersichtlich  ist,  daß  es  sich 
hierbei  um  Veräußerungen  von  Raubkopien 
oder  dergleichen  handelt, 

Des  weiteren  machen  wir  darauf  aufmerksam, 
daß  indizierte  Computerspiele  nicht  in  Form 
von  Anzeigen  beworben  werden  dürfen. 

Die  Redaktion 


Nurse 


für  464-664-6 128 


Nurse  ist  ein  sehr  komfortabler  Disk-Manager,  der  dem 
Anwender  Informationen  darüber  gibt,  was  auf  seinen 
Disketten  los  ist 

Die  Ausgaben  von  Nurse  beziehen  sich  nicht  nur  auf  In¬ 
formationen  über  die  Datei,  sondern  direkt  auf  die  Bele¬ 
gung  der  Diskette.  Über  fünf  Menuepunkte  stellen  dem  An¬ 
wender  alle  Möglichkeiten  zur  Verfügung,  sich  ein  Bild 
von  seinem  Datenträger  zu  machen. 

Die  fünf  Wahlmöglichkeiten  sind  wie  folgt: 

1.  Diskette  einiesen 

Dieser  Menuepunkt  dient  dazu,  sich  die  Diskettendaten  in 
das  RAM  einzulesen. 

2.  Catalog  ausgeben 

Bei  Anwahl  dieses  Menuepunkts  wird  nicht,  wie  gewohnt, 
ein  Inhaltsverzeichnis  ausgegeben,  sondern  die  direkte 
Information  aus  dem  Directory-Sektor  gelesen. 

Als  erstes  wird  ein  File-Kürzel  angezeigt,  das  beim  Weiter¬ 
arbeiten  mit  dem  Programm  die  Eingabe  des  Dateinamens 
erspart.  Danach  folgt  die  Usernummer.  Wird  diese 
Nummer  invers  dargestellt,  handelt  es  sich  um  ein  ge¬ 
löschtes  File.  Danach  folgt  der  Name  des  Programms  und 
sein  Extend  Ist  der  erste  Buchstabe  des  Extends  invers  dar¬ 
gestellt,  so  handelt  es  sich  um  einen  R/O-Eintrag.  Ist  der 
zweite  Buchstabe  invers,  so  handelt  es  sich  um  ein  Sy¬ 
stemfile,  und  bei  einem  inversen  dritten  Buchstaben  um  den 
Extend  eines  anderen  Files. 

3.  Diskettenbelegung  ausgeben 

Bei  diesem  Menuepunkt  wird  die  physikalische  Lage  der 
Dateien  auf  der  Disk  grafisch  angezeigt.  Das  File-Kürzel 
steht  hierbei  für  die  Datei. 

4.  File-Daten  ausgeben 

Hier  werden  alle  Informationen  über  die  Datei  aus  dem 
Directory-Sektor  und  dem  Programm-Header  gelesen. 

5.  Programm  verlassen 

Das  Programm  wird  abgebrochen. 

(Heinz  Büttner) 


1000  '**••**  MAIN:  •**•*•  (7833 

1010  '•*••*  VAR:  A$,A  *****  [8201 

1020  GOSUB  5000:'  (19951 

*  VARIABLEN  UND  KONSTANTEN 

1030  CLS : *  (1331  3 

*  INITIALISIEREN 

1040  PRINT"  NURSE  Ver.:1.0  (32721 

(0)1986  BY  O.W.E." 

1050  PRINT  (361 1 

1060  PRINT"  1)  DISKETTE  EINLESEN  (43551 

2)  CATALOG  AUSGEBEN" 

1070  PRINT"  3)  DISKETTEN-BELEGUNG  AUSGEB  (60151 
EN  4)  FILE-DATEN  AUSGEBEN" 

1080  PRINT"  5)  PROGRAMM  VERLASSEN"  (31663 

1090  A$=INKEY$ : IF  A$=""  THEN  1090:’  (31163 

*  TASTATUR-ABFRAGE  NACH 

1100  A=VAL( A$ } : IF  A< 1  OR  A>6  THEN  1090:'  (1572} 

*  MENUE 

1110  ON  A  GOSUB  3000,6000,2000,4000,1500:'  (30753 

*  UNTERPROGRAMME 

1120  GOTO  1090:  '  (9373 

*  ENDLOSSCHLEIFE 

1500  '***•*  UPRO:  QUPR  (QUIT  PROGRAM)  •***  (1853) 
• 

1510  '**••*  VAR:  *****  (3603 

1520  '•»•»*  UPROS:  *****  (9281 

1530  CLS  (91  3 

1540  PRINT"Alles  Klar  1"  (13123 

1550  END  (110  3 

2000  ******  UPRO:  ZEDB  (ZEIGE  DISKETTEN  BE  (2368 J 

LEGUNG )  ***** 

2010  .  VAR:  T,Y,ADR,H,X,Z  *****  (1314) 

2020  '**•»*  UPROS:  *****  (928] 

2030  CLS  #  1:  '  (1329  1 

*  GRAFIK -AUFBAUEN 

2040  LOCATE  1,7:'  (2059] 

*  ZUERST  X-ACHSE 

2050  PRINT  "  TRK:  00000000001111111111222  (36091 
22222223333333333" 

2060  PRINT  "  01234567890123456789012  (27131 

34567890123456789" 

2070  PRINT  "SEK:"  [1246J 

2080  FOR  T=1  TO  PHYSEK: '  (21161 

*  DANN  Y-ACHSE 

2090  PRINT"  " ; HEX$ (T , 2 )  (11823 

2100  NEXT  (3501 

2110  IF  DIRTRK=0  THEN  2180:'  (29273 

*  EINZEICHNEN  DER  BELEGTEN 

2120  FOR  T=1  TO  PHYSEK:'  [3208] 

*  TRACKS  ( SYSTEM=2 ) 

2130  FOR  Y“1  TO  DIRTRK  (1694) 

2140  LOCATE  7+Y,9+T  (3693 

2150  PRINT  CHR$ ( 24  ) ; "  ";CHR$(24)  (12863 

2160  NEXT  (3503 
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DATA  BECKER  hat  eine  tolle  Nachricht  für  alle  CPC  Anwender: 


PROFI 

PAINTER 


Das  sensationelle  Programm  zum 
Malen,  Entwerfen  und  Zeichnen 
auf  CPC-Computern.  Ausgefeilte 
Maschinenprogrammierung 
macht  PROFI  PAINTER  so  schnell 
und  Komfortabel,  daß  das 
Programm  den  berühmten  Vor¬ 
bildern  der  32-bit  Welt  kaum 
nachsteht  und  diese  in  manchen 
Punkten  sogar  übertrifft. 
Sensationell  jetzt  auch  der 
PROFI  PAINTER  Preis:  statt  bisher 
DM  198  -  jetzt  nur  noch  DM 


99- 


DATAMAT 


Die  CPC-Version  von  Deutschlands 
meistgekaufter  Dateiverwaltung. 
Leicht  zu  bedienen,  flexibel  und 
mit  Schnittstelle  zu  Textomat.  Ab 
sofort  noch  leichter  zu  bezahlen. 
Statt  DM  148,-  nur  noch  DM 


99,- 


BUDGET 

MANAGER 


Die  universelle  Buchführung 
sowohl  für  private  Zwecke  als 
auch  zur  Planung,  Überwachung 
und  Abwicklung  von  Budgets 
jeder  Art.  Der  BUDGET  MANAGER 
erleichtert  den  Umgang  mit  dem 
lieben  Geld  jetzt  auch  durch  einen 
niedrigeren  Preis.  Statt  DM  148,- 
jetzt  nur  noch  dm 


i 


99,- 


DATA  BECKER 

Merowingerstr.  30  •  4000  Düsseldorf  Tel.  (0211)  31 0010 


TEXTOMAT 


Ein  modernes,  leicht  zu  bedienen¬ 
des  Textverarbeitungsprogramm, 
das  so  manchen  überladenen  und 
komplizierten  „Textdinosaurier 
hinsichtlich  Bedienungskomfort 
um  Längen  schlägt.  Da  merkt  man 
die  Erfahrung  von  über  50.000 
verkauften  TEXTOM AT-Program- 
men  auf  den  unterschiedlichsten 
Mikrocomputern.  Statt  DM  148,- 
ab  sofort  nur  noch  DM 


99,- 


Programme 


21  70 

NEXT 

[350) 

2180 

FOR  T=1  TO  4:' 

*  EIN ZEICHNEN  DER 

[2114] 

2190 

LOCATE  8+DIRTRK,9+T: * 

*  CATALOG-SEKTOREN 

[1432] 

2200 

PRINT" $" 

[544] 

2210 

NEXT 

[350] 

2220 

ADR=DIRBÜF 

[367] 

2230 

FOR  T=0  TO  MAXDIR 

[1412] 

2240 

IF  PEEK( ADR ) >1  5  THEN  2370 

[1363] 

2250 

FOR  Y=1 6  TO  31 

1966] 

2260 

H=PEEK( ADR+Y ) : ' 

*  BLOCKS  RAUSSUCHEN 

(2972 ] 

2270 

IF  H=0  THEN  2360:' 

*  KEIN  BLOCK  VORHANDEN 

[2635] 

2280 

X= (DIRTRK ‘PHYSEK+2  *H) \PHYSEK: ' 

•  UMRECHNEN  VON  BLOCK  NACH 

[44121 

2290 

1 

Z= ( DIRTRK  *PHYSEK+  2  *H )  MOD  PHYSEK: 

*  TRACK(X)  UND  SEKTOR(Z) 

[4306  ] 

2300 

LOCATE  8+X  ,1 0+Z 

[6301 

2310 

PRINT  NAME$(T) 

C658] 

2320 

Z=Z+1 : ' 

*  EIN  BLOCK  =  ZWEI  SEKTOREN 

[2501  ] 

2330 

IF  Z  >=PHYSEK  THEN  Z=0:X=X+1 

[1952] 

2340 

LOCATE  8+X, 1 0+Z 

1630] 

2350 

PRINT  NAME$ (T) 

[658] 

2360 

NEXT 

[350] 

2370 

ADR=ADR+32 

[411  ] 

2380 

NEXT 

(3503 

2390 

RETURN 

[555] 

2500 

DR)  * 

[3075 1 

2510 

1595] 

2520 

[928] 

2530 

T=PEEK( ADR ) 

(731  J 

2540 

T$=CHR$ (-24*(T>15)-18*( T=F ILLER) ): 1 
*  AUSRECHNEN  DER  USER-NUMMER 

[1620] 

2550 

IF  T>1 5  THEN  T=T\16;' 

*  WENN  GROESSER  15  DANN 

13979) 

2560 

PRINT  T$ ; HEX$ ( T , 1 ) ; T$ ; " 

*  NEU  INVERSE  NUMMER 

11410) 

2570 

FOR  T= ADR+1  TO  ADR +8 

[1990] 

2580 

PRINT  NULL  $ ; UPPER$ { CHR  $ ( PEEK ( T ) ) ) ; 

[1228  ] 

2590 

NEXT 

[3501 

2600 

PRINT"  " ; :  ' 

*  AUSDRUCKEN  DES  EXTENT 

[2305 ] 

2610 

H=PEEK( ADR+9 ) : ' 

•  BYTE  9  >  128  =>  SYSTEM 

[1774] 

2615 

T$=NULL$+UPPER$ ( CHR$ (H  AND  127)) 

[20603 

2620  IF  H>1 27  THEN  PRINT  INV$ ; T$ ; INV$ ;  ELS 
E  PRINT  T$ ; 

[2286  ] 

2630 

H=PEEK( ADR+1 0 ) : ' 

*  BYTE  10  >  128  =>  READ-ONLY 

[3034  ) 

26  35 

T$=NULL$+UPPER$(CHR$<H  AND  127)) 

[2060  1 

26  40  IF  H >1 27  THEN  PRINT  INV$ ;T$ ; INV$ ;  ELS 
E  PRINT  T$ ; 

[2286  3 

2650 

H=PEEK( ADR  +  1 1  ): 1 

*  BYTE  12  <>  0  =>  EXTENT 

[22191 

2655 

T$=NULL$+UPPER$ (CHR$(H) ) 

(1311  1 

2660  IF  PEEK( ADR+1 2 ) <  >0  THEN  PRINT  INV$;T$ 
;INV$ ;  ELSE  PRINT  T$ ; 

(25081 

2670 

RETURN 

[555] 

3000 

)  ** 

3010 

******  UPRO:  LISD  (LOG  IN  SOURCE  DISK 

(35053 

[2248) 

3020 

LBYT 

,SEKBYT, PHYSEK, MAXDIR  ***** 

[4028] 

30  30 

[1281  1 

3040 

iA:  * 

•  EINLOGGEN  DISK 

11317] 

3050 

ADR=FNDEEK( &BE40 ) : * 

•  FESTLEGUNG  ALLER  WICHTIGEN 

[28451 

3060 

ADR=FNDEEK<  ADR+1 0 )  :  * 

•  KONSTANTEN  DER  EINGELEGTEN 

[2533] 

3070 

SEKOFF=PEEK( ADR+1 5 ) : ' 

*  DISKETTE 

[1553] 

3080 

DIRTRK =FNDEEK ( ADR+ 1 3 ) 

[1352] 

3090 

RAMADR=FNDEEK( &BE7D ) 

[1666] 

3100 

FILBYT=PEEK( ADR+1 9 ) 

[1145] 

3110 

SEKBYT=256  *PEEK( ADR  +  20 ) 

[1476] 

3120 

PH YSEK=PEEK ( ADR+1  6 ) 

[816] 

3130 

MAXDIR=FNDEEK( ADR+7 ) 

[23981 

3140 

TRK=DIRTRK: ' 

*  EINLESEN  DER  4  CATALOG 

(8461 

3150 

SEK=SEKOFF: ' 

•  -SEKTOREN 

[1374] 

3160 

BUF=DIRBUF 

[502] 

3180 

GOSUB  3500: ' 

•  READ  SEKTOR 

[1499] 

3190 

FOR  T=1  TO  3 

[592] 

3200 

SEK=SEK+1 

[5071 

3210 

BUF=BUF+51 2 

[512) 

3220 

GOSUB  3500 

[1021  ] 

3230 

NEXT 

(3501 

3240 

CLS  #1 

[373  1 

3250 

RETURN 

[555] 

3500 

[2788] 

3510 

[360] 

3520 

[2360] 

3530 

POKE  DRIVE, PEEK(RAMADR) : * 

*  WERT  IST  SCHON  DA 

[5097] 

3540 

POKE  TRACK ,TRK 

[5563 

3550 

POKE  SEKTOR, SEK 

1629) 

3560 

POKE  BUFFER , FNLOW ( BUF ) 

[332] 

3570 

POKE  BUFFER+1 ,FNHIGH(BUF) 

[7791 

3590 

CALL  F IR ADR 

(279) 

3600 

RETURN 

[555] 

4000 

N)  •* 

'*•***  UPRO:  FIDA  (FILE-DATEN  AUSGEBE 

[2187  ) 

4010  *•**•*  VAR:  T,H,KUERZEL$, ADR, SUMME, PR 
UEFSUMME  ***** 

13160] 

4020 

*  *  *  * 

[2438] 

4030 

CLS  01 

1373] 

4040 

LOCATE  1,7 

[629] 

4050  PRINT"BIITE  GEBEN  SIE  DAS  KUERZEL  FUE 
R  DAS  GEWUENSCHTE  FILE  EIN" 

[4713  ] 

4060 

INPUT  "KUERZEL=",KUERZEL$ 

[2656J 

4070 

FOR  T=0  TO  63; * 

•  SUCHEN  DES  KUERZELS 

[1274] 

4080 

IF  KUERZEL$=NAME$ (T)  THEN  4110 

[19491 

4090 

NEXT 

(350  ] 

4100 

GOTO  4030: * 

•  NICHT  DA  =>  NEUE  EINGABE 

[2747  I 

4110 

ADR=DIRBUF+32  *T 

[352  3 

4120 

CLS  01 

(373  1 

4130 

LOCATE  1 , 7 

[629  ] 

4140  PRINT" INFORMATIONEN  AUS  DEN  CATALOG-T 
RACKS : " 

13176  3 

41  45 

PRINT 

[361  ]  , 

4150 

PRINT"FILE-NAME  :"; 

[1238  ] 

4160 

GOSUB  2500:' 

*  SCHREIBE  NAME  AN  ADR 

[2297 ] 

4170 

PRINT 

[361  ) 

4180 

T=PEEK( ADR ) 

[731  3 

4190 

PRINT" USER-NUMMER  :  "  ;  IiEX$  ( T ,  2  ) 

12084) 

4200 

ELSE 

IF  T=FILBYT  THEN  PRINT"  = >GELOESCHT" 
PRINT 

[2396] 

4210  PRINT"EXTENT-NUMMER  :";HEX$(PEEK 

(ADR+1 2) ,2) 

[3372] 

4220 

PRINT" SYSTEM-FLAG 

[2290  ] 

4230  IF  PEEK{ ADR+1 0 ) >127  THEN  PRINT"AN"  EL 
SE  PRINT" AUS" 

[2621  ] 

4240 

PRINT"READ-ONLY -FLAG 

[1410] 

4250  IF  PEEK( ADR+9) >127  THEN  PRINT" AN"  ELS 
E  PR INT" AUS" 

(34241 

4260 

T=PEEK( ADR+1  5 ) 

[899) 

4270 

PRINT"BELEGTE  RECORDS  : " ;HEX$ (T,2 ) 

[27531 

4280 

DEN" 

IF  T=1 28  THEN  PRINT  "  =  > EXTENT  VORHAN 
ELSE  PRINT 

[4382] 

4290 

PRINT"BENUTZTE  BLOCKS  : " ; 

[2206] 

4300 

FOR  T=1 6  TO  31 

[1066  ] 

4310 

H=PEEK ( ADR+T ) 

(1417) 

4320 

IF  H<  >0  THEN  PRINT  HEX$(H,2);"  "; 

[3884 ] 

4330 

NEXT 

[350] 

4340 

PRINT 

[361  ] 

4350 

CKS: 

PRINT" INFORMATIONEN  AUS  DEN  DATEN-TRA 

II 

[2583J 

4355 

PRINT 

[361  ) 

4360 

T=PEEK( ADR+1 6 ) 

[726  1 

4370 

TRK= (DIRTRK*PHYSEK+2  *T) \PHYSEK: ' 

*  EINLESEN  DES  ERSTEN  DATEN 

(53131 

4380  SEK=>(  (DIRTRK *PHYSEK+2*T)  MOD  PHYSEK)  + 
SEKOFF:'  -SEKTOR 

[4905] 

4390 

BUF=SK1 BUF 

1551  J 

4410 

GOSUB  3500: ' 

•  READ  SEKTOR 

[1499] 

4420 

ADR=SK1 BUF 

[1520] 

4430 

SUMME=0: * 

*  ASCII -FILES  ERKENNT  MAN 

[2008 ] 

4440 

FOR  T=ADR  TO  ADR+66:* 

*  NUR  AN  DER  PRUEFSUMME 

[40401 

4450 

SUMME=SUMME+PEEK(T) 

[968] 

4460 

NEXT 

[3501 

4470 

PRUEFSUMME=FNDEEK ( ADR+ 6  7 ) : * 

•  FUER  ASCII -FILES  STIMMT 

[3313] 

132 
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44ÖU 

IF  PRUEFSUMME=SUMME  THEN  4510:' 

[3520] 

•  SPEICHER  BRINGEN  UND 

•  DIE  SUMME  NICHT 

5240 

H=VAL( "&"+H$ ) : * 

[2558 ) 

4490 

PRINT" FILETYP  : ASCII" 

[2281  ] 

*  ADRESSLAGE  ANPASSEN 

4500 

RETURN 

[555] 

5250 

POKE  T,H 

(522  ) 

4510 

PRINT"FILE-NAME 

(1292  ] 

5260 

NEXT 

[3501 

4520 

GOSUB  2500: ' 

(2297 1 

5270 

DATA  21 ,00,00,CD,D4, BC,D0 ,22,00,00,79 

[2498] 

*  SCHREIBE  NAME  AN  ADR 

,32, 00, 00, IE, 00 

4530 

PRINT 

(361  I 

5280 

DATA  16, 00, 0E, 00, 21 , 00 , 00 , DF, 00 , 00 ,C9 

[1787] 

4540 

PRINT” USER-NUMMER  :":HEX$(PEE 

[1868  ] 

,84,00,00,00 

K( ADR ) ,  2 ) 

5290 

DRIVE=FIRADR  +  1  5 : ' 

[1850] 

4550 

PRINT" FILE-TYP 

[1495] 

*  KONSTANTEN  FUER  DAS 

4560 

T= (PEEK( ADR+1 8 )  AND  &X1110)\2:' 

[2337] 

5300 

TRACK=FIRADR+17: ' 

[2535  1 

*  BIT  2-4  =  TYP  BITS 

*  MASCHINEN-PROGRAMM 

4570 

IF  T=0  THEN  PRINT"BASIC" 

[688  ] 

5310 

SEKTOR =F IR ADR+1 9 

[1753  ] 

4580 

IF  T=1  THEN  PRINT"BINAER" 

[2550] 

5320 

BUFFER=FIRADR+21 

(8231 

4590 

IF  T=3  THEN  PRINT"ASCIl" 

[1568] 

5330 

BEFEHL=FIRADR+27 

[868] 

4600 

T=PEEK( ADR+1 8 )  AND  1:' 

(2670J 

5340 

POKE  FIR ADR+1 , FNLOW ( BEFEHL ) : ' 

(36961 

•  ERSTE  BIT  =  PROTECT  BIT 

•  HIER  WIRD  DIE  ADRESSLAGE 

4610 

PRINT" PROTECT-FLAG  : " J 

(2538  1 

5350 

POKE  FIRADR+2 , FNHIGH <  BEFEHL ) : ' 

[2410  ] 

4620 

IF  T=1  THEN  PRINT" AN"  ELSE  PRINT" AUS" 

[2074  } 

*  ANGEPASST 

4630 

PRINT"FILE-LADEADRESSE  : " ; HEX$ ( FND 

[3805] 

5360 

POKE  FIRADR+8, FNLOW ( BEFEHL+1  ) 

[2220] 

EEK( ADR+21  ) -  4 ) 

5370 

POKE  FIRADR+ 9, FNHIGH (BEFEHL+1 ) 

[1336  1 

4640 

PRINT"FILE-LAENGE  :":HEX$(FND 

[2975] 

5380 

POKE  FIR ADR+1 2 , FNLOW ( BEFEHL+3 ) 

[20761 

EEK(ADR+24) ,4) 

5390 

POKE  FIR ADR +13, FNHIGH (BEFEHL+3) 

120431 

4650 

PRINT"MASCHINEN-START  ADR . : " : HEX$ ( FND 

[3415] 

5400 

POKE  FIRADR+24, FNLOW( BEFEHL+1 ) 

(2222] 

EEK( ADR+26 ) , 4 ) 

5410 

POKE  FIRADR+25, FNHIGH ( BEFEHL+ 1  ) 
DIRBUF=FIRADR+31  : ' 

[2298  ] 

4660 

RETURN 

[5551 

5420 

12955] 

5000 

***•••  ÖPRO:  IAWE  {INITIALISIERE  ALLE 

[2725] 

*  ADRESSEN  DER  DATEN-BUFFER 

WERTE )  • * * *  * 

5430 

SKI BUF=FIRADR+2079 

[1238  1 

5010 

'****•  VAR:  H , T , H $  ***** 

[1  364  ] 

5470 

FOR  T=0  TO  25:' 

[1  472  1 

5020 

[4780  ] 

*  AB  HIER  WERDEN  DIE  KUERZEL 

ER, BEFEHL, DIRBUF, SKI BUF  ***** 

[2034  ] 

5480 

NAME$(T)=CHR$(T+65):  ' 

(2665J 

5040 

(9281 

5490 

NEXT : ' 

[1204] 

5050 

DEF  FNHIGH( X ) =INT( X/256 ) :  * 

[3544  ] 

*  A-Z , 0-9 ,a~z ,  % ,  & 

*  HIGH-BYTE  EINER  16-BIT  ZAHL 

5500 

FOR  T=26  TO  35 

[1035] 

5060 

DEF  FNLOW(X) =X-256*FNHIGH(X) :  ' 

[2381  ] 

5510 

NAME$ ( T ) =CHR$ ( T+  22 ) 

[1703] 

*  LOW  -BYTE  EINER  16-BIT  ZAHL 

5520 

NEXT 

(3501 

5070 

DEF  FNDEEK(X ) =PEEK( X) +256 *PEEK( X+1  ):  ' 

[2415] 

5530 

FOR  T=36  TO  61 

[11171 

•  16-BIT  PEEK 

5540 

NAME$ (T) =CHR$ (T+61 ) 

(1517] 

5080 

DIM  NAME$ ( 63 ) : ' 

[3315  ] 

5550 

NEXT 

[350] 

*  FUER  MAX.  64  EINTRAEGE 

5560 

NAME$ ( 62 ) ="%" 

(5201 

5090 

MODE  2 :  ' 

[2810  ] 

5570 

NAME$  (  63  )  ="&" 

[540] 

*  AB  HIER  WERDEN  DER  MODE  UND 

5580 

RETURN 

[555] 

5100 

PEN  1 : ' 

[2639] 

6000 

[1962  1 

*  DIE  FARBWERTE  INITIALISIERT 

9  9 

5110 

PAPER  0 

[816] 

6010 

[875] 

5120 

INK  0,0,0 

[268] 

6020 

(1593  ] 

5130 

BORDER  0,0 

[987  ] 

6030 

CLS  #1 

[373] 

5140 

INK  1,26,26 

[199] 

6040 

LOCATE  1 , 7 

(629  ] 

5150 

H=PEEK( HIMEM+1 ): ' 

[2967  ] 

6050 

FOR  R=1  TO  4 

(6601 

*  FESTSTELLEN  OB  DER  SPEICHER 

6060 

PRINT"#  U  Name  RSE 

13472) 

5160 

IF  H=87  THEN  5190:' 

[3153] 

*  GIB  U EBERSCHRIFT  AUS 

*  FUER  DIE  BUFFER  UND  DAS 

6070 

NEXT 

[350] 

51  70 

MEMORY  HIMEM- 30 0 0 : 1 

[1952] 

6080 

ADR=DIRBUF 

[3671 

*  MASCHINENPROGRAMM  SCHON 

6090 

FOR  R=0  TO  MAXDIR: * 

[2393  1 

5180 

POKE  HIMEM+1, 87:' 

(1521  ] 

*  GEHE  ALLE  EINTRAEGE  DURCH 

•  INITIALISIERT  IST 

6100 

LOCATE  1 +20  *(R\1 6 ) , 9+ (R  MOD  16) 

[1  536  ] 

5190 

WINDOW  #1,1,80 ,6,25: ' 

[4447  ] 

6110 

PRINT  NAME$ (R) ; " 

[13291 

*  UNTERE  BILDSCHIRM-HAELFTE 

*  AUSGABE  DES  KUERZEL 

5200 

FIRADR=HIMEM+2 : 1 

[2515  1 

6120 

GOSUB  2500: ' 

(31431 

*  ERSTE  FREIE  ADRESSE 

*  GIB  NAMEN  AN  ADR  AUS 

5210 

RESTORE  5270 

[729] 

61  30 

ADR=ADR+32 : ' 

[908] 

5220 

FOR  T=FIRADR  TO  FIRADR+30 : * 

[2301  ] 

*  NAECHSTER  EINTRAG 

*  MASCHINEN-PROGRAMM  IN  DEN 

6140 

NEXT 

[350] 

5230 

READ  H$: ' 

[2365] 

6150 

RETURN 

[555] 

Inserentenverzeichnis  Nr.  7 


Aetivision 

75 

D+G  Datentechnik 

73 

Mükra 

41 

Byte  me 

31 

Elektronik  Center 

95 

Naujoks 

55 

Cherry-Soft 

77 

Fricke 

95 

PiZie  Data 

57 

Comal 

99 

GAI 

73 

Probst 

47 

CompuCamp 

51 

G  Computerstore 

77 

SFK 

9 

Computer  Max 

31 

G+W  Electronic 

43 

Schneider  Computer 

68,69,136 

Computer  Studio  Reis 

57 

Gerdes 

105 

Schuster 

38,39 

CSE  Schauties 

8 

GFA  Integral  Hydraulik 

2 

Star  Division 

26,27 

Dast  Mobil 

43 

Heimcomputer  Shop 

7 

TG-Soft 

23 

Data  Becker 

117,131 

Kopisch 

47 

Van  der  Zalm 

105 

Data  Berger 

107 

Leidinger  -f  Haupenthal 

55 

Vortex 

90,91 

Data  Media 

Dobbertin 

120,121,135 

83 

Maxell 

15 

Weeske 

33 
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„Schneider  CPC  8/86** 
erhalten  Sie  ab  30.  Juli 
bei  Ihrem 

Zeltschrlfftenhändler 


Der  UDG-Designer  ist  ein  tolles  Hilfsprogramm 
zum  Erstellen  selbstdefinierter  Graßkzeichen.  Die 
komfortable  Menuesteuerung  und  die  vielfältigen 
Optionen  garantieren  größte  Leistungsfähigkeit. 


Berichte: 


Der  CPC  geht  fremd 

-  Fremdmonitore  am  CPC.  Wir  zeigen 
Ihnen,  wie  Sie  problemlos  externe 
Monitore  an  Ihrem  Schneider  CPC 
betreiben  können. 

Des  weiteren  ist  geplant,  auch  einen 
HF-Modulatorzum  Selbstbau  vorzu- 
stellen,  mit  dem  Sie  Ihren  CPC  an 
einen  handelsüblichen  Farbfernseher 
mit  AV-Buchse  anschließen  können. 


Serie: 


Das  Software-Experiment  wird  Ihnen 
anhand  von  mehreren  Beispielen 
wieder  einige  Grundzüge  der  künstli¬ 
chen  Intelligenz  vermitteln.  Besonde¬ 
res  Interesse  wird  u.a.  das  Programm 
"Repro”  wecken,  das  in  dieser  Form 
wohl  einmalig  sein  dürfte. 

Des  weiteren  gibt  es  eine  bemer¬ 
kenswerte  Version  des  bekannten 
"Games  of  Live”. 


Die  Hardware-Rubrik  bietet  Schnittstellen  "total”. 
A  uf  dem  Program  m  stehen  gleich  z  wei  serielle  Schnitt¬ 
stellen,  die  Hardware-Freunde  dürfen  gespannt  sein. 


Winter  Games  -  der  Top-Hit  nun  auch  auf  den 
Schneider  CPC's!  Unser  Bildschirm-Shot  macht 
Ihnen  Appetit?  Im  nächsten  Heß  gibt’s  eine  aus¬ 
führliche  Review. 


Hardware: 


Schnittstellen  satt: 

Im  nächsten  Heft  präsentieren  wir 
gleich  zwei  serielle  Schnittstellen! 

-  im  Rahmen  der  Schneiderware  eine 
V.24  im  Selbstbau 

-  für  die  Profis:  eine  kompakte  RS  232 
mit  nur  einer  Betriebsspannung 


Software  Reviews: 


Endlich  da: 

Winter  Games  von  Epyx  Software 

-  lange,  lange  haben  die  Schneider- 
Freunde  auf  dieses  Top-Programm 
warten  müssen.  Zwar  ist  jetzt  nicht 
die  rechte  Jahreszeit  für  ein  Sport¬ 
spiel  in  der  weißen  Landschaft  doch 
dürfte  diese  Tatsache  dem  Erfolg  von 
Winter  Games  keinen  Abbruch  tun. 

Weiterhin  testen  wir: 

-  Heavy  on  the  Magick 

-  Textking 

u.v.m. 


Tips  &  Tricks: 


Vardump 

-  dieses  nützliche  Utility  druckt  alle 
in  einem  Programm  vorkommenden 
Variablen,  deren  Name  sowie  die 
entsprechenden  Zeilennummern, 
aus. 

Das  ideale  Werkzeug  für  Pro¬ 
grammentwickler  und  für  zu  modifi¬ 
zierende  Programme. 

UDG-Designer 

-  ein  nicht  alltäglicher  Zeichengene¬ 
rator! 

Komplette  Desktop-Benutzerober- 
fläche,  gleichzeitige  Darstellung  in 
allen  drei  Modi  u.v.m. 


Joyce: 


Joyce  und  Grafik 

-  auch  ohne  die  Anschaffung  speziel¬ 
ler  Software  sind  grafische  Darstel¬ 
lungen  möglich,  wenn  man  Mallard- 
Basic  und  Dr.  Logo  miteinander 
arbeiten  läßt. 


CAL: 


Loko 

-  dieses  Spiel  begeistert  die  ganze 
Familie! 

Versuchen  Sie,  Ihre  Lokomotive  vor¬ 
wärts  zu  bewegen,  indem  Sie  diverse 
Rechenaufgaben  geschickt  lösen. 
Denksport  und  Spiel  -  eine  gelunge¬ 
ne  Kombination! 


Programme: 


Programmhit  des  Monats 

-  der  Programmhit  kommt  diesmal 
aus  der  Sparte  Anwendungen. 
Paint  Master  -  das  ist  das  Grafik¬ 
programm  der  Superlative.  Die  reich¬ 
haltigen  Optionen  sowie  eine  kom¬ 
fortable  Menuesteuerung  garantie¬ 
ren  extreme  Leistungsfähigkeit  bei 
hoher  Geschwindigkeit  Paint  Master 
erwartet  Sie  in  der  nächsten  Ausgabe. 


134  CPC  7  *86 


Bitte  Club-Information  auf  Seite  121  beachten! 


Druckerplattform 

bestehend  aus  einer  Trägerplatte  für  den  Drucker  und  einer  darunter  ange¬ 
ordneten  Platte  für  ca.  1 000  Blatt  Papier.  Beide  Platten  sind  durch  stabile 
Seitenwände  miteinander  verbunden. 

Ansprechendes  Design  und  hochwertiges  Material  (Acrylglas)  zeichnen 
dieses  Produkt  aus. 

Außenmaß  420  x  400  x  1 30  mm  79,—  DM  99. —  DM 


Die  Maus  für  Schneider 

Was  Apple  und  Atari  recht  Ist,  ist  Schneider  billig. 


Die  Maus  ist  eine  leicht  zu  bedienende  Vorrichtung,  die  mit  der  Hand  geführt 
wird.  Die  Bewegungen  der  Maus  werden  auf  ein  Zeichen  (z.B.  einen  Pfeil)  auf 
dem  Bildschirm  Ihres  Computers  übertragen.  Anstatt  komplizierte  Befehle 
einzutippen,  zeigen  Sie  mit  der  Maus  einfach  auf  die  gewünschte  Funktion 
und  drücken  eine  der  beiden  Tasten. 

In  Verbindung  mit  einem  Graphik-Paket  verfügen  Sie  über  ein  Werkzeug, 
welches  Ihren  Bildschirm  in  die  Leinwand  eines  Künstlers  verwandelt.  Es 
ermöglicht  Ihnen,  Gemälde  zu  erstellen  ohne  die  Verwendung  von  Papier  und 
Zeichengerät  ~  * 


Ohne  Abbildung 

Schneider-Monitor- 
Verlängerungskabel 
für  CPC  464 

Best  -N<  826 

für  CPC  664  +  6128 

Best -Nr  827 


Staubschutzhaube 


Schneider-Maus 

Wird  über  einen  Spezial-Adapter  an  den  Joystickport  von  Schneider  CPC  464, 
CPC  664  oder  CPC  6128  angeschlossen. 

Adapter  und  Unterprogramme  zum  Einbau  der  Maus  in  bestehende  BASIC- 
Programme,  sowie  Graphik-Paket  mit  Maus- Unterstützung  im  Lieferumfang 
enthalten. 

Deutsche  Anleitung;  mit  Software  auf  3"-Diskette  •  69, —  DM 

I  i  T-r-t-f-4-L-L  /  i  TTf+Ui  199,— DM 


t  Grün-Monitor  816 
f  Färb- Monitor  817 
(Drucker  818 
(  CPC  464  619 

'  FlODDV  820 
f.  664 
f.  6128 


Datenrecorder  MG  3810 

für  CPC  664/6128 


anschlußfertig  inkl  Kabel  und 
Netzteil 

Best-Nr  836  59  “  011 


MULTI  DATEI  i Data  Media)  Ein  universelles  Oateiverwaltungsprogramm 
Cass  Best -Nr  141  Disk  3"  Best-Nr  241 

89- 0M  49- DM  99- DM  59- DM 

ROUTINEN,  TIPS  UND  TRICKS 


(Data  Media) 

Ca  50  wichtige  Programmroulmen  für  ieden  Programmierer,  wie  zB  Sortierroutine.  Inkeyroutine 
Diskettenroutine  usw 

Cass  Best-Nr  1 51  Disk  3"  Besl -t 

79-  DM  39,- DM  89,-1 

GREDI  (Data  MeCiai 

Hiltsprogramm  zur  Herstellung  von  Hires-Graliken 
Cass  Best-Nr  142  Drsk  3 '  Best -t 


Diskettenbox  für  3”-Disketten 


aus  antistatischem,  schlagfestem  Kunststoff,  mit  transparentem,  aufklappbarem  und 
abnehmbaren  Deckel  mit  3  Stützplatten  inkl  Sichtreitern,  für  40  Disketten,  nicht, 
abschließbar.  WtM WM 


dito  mit  Schloß 


FOCUS  (Data  Media)  /  ■  r  A  4 — i — /  f  f  /  r~T~4-4-~LJ.  n~t~i~h 

Programrnzur  perspektivischen  Darstellung  von  3D-6raiiker  Slellen  Sie  z  B  ein  Haus  dar  und  verän¬ 
dern  Sie  durch  Eingabe  der  Winkel  die  Jersoek|ive! 


Casselle  Besl -Nr  138 


M— 


Speedking 

Joystick  der  Luxusklasse,  der  Hand  angepaßt! 
Alle  Funktionen  über  Mikroschalter  gesteuert. 


Data  Media  Mailorder  und  Computerclub 

Bestellen  Sie  noch  heute,  Lieferung  erfolgt  umgehend!  Zah¬ 
lung  per  Vorkasse  oder  Nachnahme  zuzügl.  Porto-  bzw.  Nach¬ 
nahmegebühr  (Nachnahme  ins  Ausland  Ist  nicht  möglich) .  / 

Weitere  Artikel  in  unserem  Club-  oder  Mailorderkatalog.  Bitte  anfordern  (2,-  DM  für  Rückporto  /  J 

beilegen).  /  .T 

Data  Media  GmbH,  Ruhralle  55, 4600  Dortmund,  Tel.:  (02  31)  12  50  71-3  /  ■ 


i!j  Bestellkarte  benutzen!» 


• 

^1  II 

r 

Tff 

Tji 

tph 

Die  professionelle  Textverarbeitung  von  Schneider  für  den  »CPC« 


Diese  professionelle  Textverarbeitung  auf 
Diskette,  kann  durch  ihre  Vielzahl  von  Möglich¬ 
keiten  für  verschiedenste  Zwecke  eingesetzt 
werden. 

Zum  Programmpaket  »TexPack«  gehört  neben 
der  eigentlichen  Textverarbeitung  auch  eine 
komfortable  Adreß-  und  Dateiverwaltung. 

Die  Leistungsmerkmaie  des  »TexPack«  in  Stichworten: 


Zeichen  einfügen  und  löschen 
Zeilen  einfügen  und  löschen 
Absätze  einfügen  und  löschen 
Begriffe  suchen  und  ersetzen 
Wort  löschen,  Zeilenrest 
löschen 

Zeilen  aufbrechen  und 
anschließen 
Bausteinverarbeitung 
Adreßbe-  und  -Verarbeitung 
Textbreite  bis  zu  240  Zeichen 
pro  Zeile 
Fließtexteingabe 
Randausgleich  auch  zur 
nachträglichen  Änderung  der 
Textbreite 

Block-  oder  Flattersatz 
wahlweise 

Freie  Wahl  des  linken  Randes 
für  beliebige  Textabschnitte 


Folgende  Druckausgaben  sind 

variierbar: 

•  Schriftbreite 

•  Zeilenabstand  ein-, 
eineinhalb-  und  zweizeilig 

•  Formelschreibweise 
(Hoch-  und  Tiefstellung) 

•  verschiedene 
Hervorhebungsarten : 
Unterstreichen,  Fettdruck  etc. 

•  Normalschrift  oder 

Korrespondenz- Qualität  e 
(Near- Letter-Quality)  QisK® 


Staaten  erfassen  J  andern 
Infomtionw  Prüfen 
Schreibauftrag  erfassen  A  andern 
Schreibauftrag  ausführen 
Patend’.  «kette  generieren 
Index  des  Kennworts  erneuern 
I rennen  einer  Kartei 

Testbearbeitung 
Pr  ogr  arm -Ende 
Bitte  wählen  Si? • 


«enprogran^ 


Damit  Sie  den  vollen  Leistungsumfang  von  »TexPack«  nutzen  können: 


»FD-1«  Diskettenlaufwerk  »CF2«  Diskette 

als  zweites  Laufwerk 


Drucker  »N  LQ  401«  Traktoraufsatz  »SFT  401« 

(Near  Letter  Quality)  zum  »NLQ  401« 


Unsere  Software-Palette  wird  ständig  erweitert.  Fragen  Sie  ihren  Händler  nach  den  aktuellen  Neuerscheinungen. 


Schneider 


rnmoi  itco  n / /  iicihn 
LuuruiCK  uns i -nun 


